diff --git a/lib/Text/TranscriptMiner/Web/Controller/Docs/Search.pm b/lib/Text/TranscriptMiner/Web/Controller/Docs/Search.pm index f3b03f7..6d8b4bc 100644 --- a/lib/Text/TranscriptMiner/Web/Controller/Docs/Search.pm +++ b/lib/Text/TranscriptMiner/Web/Controller/Docs/Search.pm @@ -10,7 +10,13 @@ sub start :Chained("") :PathPart("docs/search") :CaptureArgs(0) { sub get_root :Chained("start") :PathPart("") :Args(0) { my ($self, $c ) = @_; - $c->stash( template => 'search/results.tt' ); + if ($c->req->params->{txt} == 1) { + $c->stash( template => 'search/results_txt.tt', + nowrapper => 1); + } + else { + $c->stash( template => 'search/results.tt' ); + } } sub tag_search :Chained("start") :PathPart("tags") :Args(0) { @@ -52,7 +58,14 @@ sub display_text_for_single_tag : Chained("start") PathPart('') Args(1) { {start_dir => $c->config->{start_dir}}); my $interviews = $corpus_object->search_for_subnodes($docs); my @interviews = $corpus_object->get_interviews($c->config->{start_dir}, @$interviews); - $c->stash(template => 'search/results.tt', + if ($c->req->params->{txt} == 1) { + $c->stash( template => 'search/results_txt.tt', + nowrapper => 1); + } + else { + $c->stash( template => 'search/results.tt' ); + } + $c->stash( search => $tag, interviews => \@interviews, ); diff --git a/root/search/results_txt.tt b/root/search/results_txt.tt index 3121447..82ac8b0 100644 --- a/root/search/results_txt.tt +++ b/root/search/results_txt.tt @@ -1,21 +1,25 @@ -

# Search for "[% search %]"

[% uncoded = [ ] %] -

source: [% c.req.uri %] +# Search for "[% search %]" [% uncoded = [ ] %] + +source: [% c.req.uri %] [% FOREACH i IN interviews %] [% SET doc_file = i.file.relative(c.config.start_dir) %] [% SET code_search = i.get_this_tag(search); %] [% IF code_search.size == 0; uncoded.push(doc_file); NEXT; END; SET search_url = c.uri_for('/docs', doc_file) _"#$search" %] -

## [% doc_file %]

-

source: [% search_url %]

+## [% doc_file %] + +source: [% search_url %] + [% FOREACH res IN code_search %] -

[% FILTER html_line_break; res; END %]


  +[% res %] + [% END %] [% END %] -

## Documents in this set without the code [% search %]

- +