From: <de...@de...> - 2012-05-13 04:47:21
|
Author: PeterThoeny Date: 2012-05-12 23:47:14 -0500 (Sat, 12 May 2012) New Revision: 22926 Trac url: http://develop.twiki.org/trac/changeset/22926 Modified: twiki/trunk/core/lib/TWiki/Search.pm Log: Item6875: New TOPICTITLE variable feature - performance improvement with new $topictitle variable in SEARCH format Modified: twiki/trunk/core/lib/TWiki/Search.pm =================================================================== --- twiki/trunk/core/lib/TWiki/Search.pm 2012-05-13 04:34:15 UTC (rev 22925) +++ twiki/trunk/core/lib/TWiki/Search.pm 2012-05-13 04:47:14 UTC (rev 22926) @@ -852,7 +852,7 @@ if( $format ) { $out = $format; $out =~ s/\$web/$web/gs; - $out =~ s/\$topictitle/_getTopicTitle($this, $web, $topic)/ges; + $out =~ s/\$topictitle/$meta->topicTitle()/ges; $out =~ s/\$topic\(([^\)]*)\)/TWiki::Render::breakName( $topic, $1 )/ges; $out =~ s/\$topic/$topic/gs; $out =~ s/\$date/$revDate/gs; @@ -1273,13 +1273,6 @@ $name, '$value', { break => $breakArgs, protectdollar => 1, showhidden => 1} ); } -# Returns the topic title -sub _getTopicTitle { - my ( $this, $web, $topic ) = @_; - my $text = $this->{session}->TOPICTITLE( {}, $topic, $web ); - return $text; -} - # Returns the topic revision info of the base version, # attributes are 'date', 'username', 'wikiname', # 'wikiusername'. Revision info is cached in the search |