Revert "added the tweakbestlink hook"
authorintrigeri <intrigeri@boum.org>
Sun, 2 Nov 2008 16:33:32 +0000 (17:33 +0100)
committerintrigeri <intrigeri@boum.org>
Sun, 2 Nov 2008 16:33:32 +0000 (17:33 +0100)
This reverts commit e51089e11fc1093a253fc13ebfbd5d55912eba59.
The new "inject()" feature should replace this ad-hoc hook.

Signed-off-by: intrigeri <intrigeri@boum.org>
IkiWiki.pm
doc/plugins/write.mdwn

index 90fedca4f5dfb5614c229be58f453ea83307ea28..ba1847093fce3d5a64aa1ae6508a5726cc6ee5c3 100644 (file)
@@ -815,7 +815,6 @@ sub will_render ($$;$) { #{{{
 sub bestlink ($$) { #{{{
        my $page=shift;
        my $link=shift;
 sub bestlink ($$) { #{{{
        my $page=shift;
        my $link=shift;
-       my $res=undef;
        
        my $cwd=$page;
        if ($link=~s/^\/+//) {
        
        my $cwd=$page;
        if ($link=~s/^\/+//) {
@@ -830,35 +829,25 @@ sub bestlink ($$) { #{{{
                $l.=$link;
 
                if (exists $links{$l}) {
                $l.=$link;
 
                if (exists $links{$l}) {
-                       $res=$l;
+                       return $l;
                }
                elsif (exists $pagecase{lc $l}) {
                }
                elsif (exists $pagecase{lc $l}) {
-                       $res=$pagecase{lc $l};
+                       return $pagecase{lc $l};
                }
                }
-       } while ($cwd=~s{/?[^/]+$}{} && ! defined $res);
+       } while $cwd=~s{/?[^/]+$}{};
 
 
-       if (! defined $res && length $config{userdir}) {
+       if (length $config{userdir}) {
                my $l = "$config{userdir}/".lc($link);
                if (exists $links{$l}) {
                my $l = "$config{userdir}/".lc($link);
                if (exists $links{$l}) {
-                       $res=$l;
+                       return $l;
                }
                elsif (exists $pagecase{lc $l}) {
                }
                elsif (exists $pagecase{lc $l}) {
-                       $res=$pagecase{lc $l};
+                       return $pagecase{lc $l};
                }
        }
 
                }
        }
 
-       if (defined $res) {
-               run_hooks(tweakbestlink => sub {
-                       $res=shift->(
-                               page => $page,
-                               link => $res);
-               });
-               return $res;
-       }
-       else {
-               #print STDERR "warning: page $page, broken link: $link\n";
-               return "";
-       }
+       #print STDERR "warning: page $page, broken link: $link\n";
+       return "";
 } #}}}
 
 sub isinlinableimage ($) { #{{{
 } #}}}
 
 sub isinlinableimage ($) { #{{{
index f147b0766c385ce5d2b8b9890f6b2ea0aa58a5a8..82b377820c248ec946237529caf6c5f792469c38 100644 (file)
@@ -446,17 +446,6 @@ ikiwiki; it is run just after ikiwiki has removed the trailing
 
 It should return the modified url.
 
 
 It should return the modified url.
 
-### tweakbestlink
-
-       hook(type => "tweakbestlink", id => "foo", call => \&tweakbestlink);
-
-This hook can be used to modify the page returned by `bestlink`. It is
-passed named parameters `page` and `link`. These are, respectively,
-the page where the link will appear and the link ikiwiki would choose
-as the best one, if no `tweakbestlink` hook was in effect.
-
-It should return the modified link.
-
 ## Plugin interface
 
 To import the ikiwiki plugin interface:
 ## Plugin interface
 
 To import the ikiwiki plugin interface: