fix bugs in `find_src_files()`.

[ikiwiki.git] / IkiWiki.pm

diff --git a/IkiWiki.pm b/IkiWiki.pm
index 115c512d3eba06395390dce71734b49e3eb94c37..90e623330af4d760a9f941f14d04cf61b415b4c8 100644 (file)
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -14,7 +14,8 @@ use open qw{:utf8 :std};
 use vars qw{%config %links %oldlinks %pagemtime %pagectime %pagecase
            %pagestate %wikistate %renderedfiles %oldrenderedfiles
            %pagesources %destsources %depends %depends_simple %hooks
-           %forcerebuild %loaded_plugins @autofiles};
+           %forcerebuild %loaded_plugins @autofiles %dellinks
+           %delrenderedfiles};
 
 use Exporter q{import};
 our @EXPORT = qw(hook debug error template htmlpage deptype
@@ -22,7 +23,7 @@ our @EXPORT = qw(hook debug error template htmlpage deptype
                 htmllink readfile writefile pagetype srcfile pagename
                 displaytime will_render gettext urlto targetpage
                 add_underlay pagetitle titlepage linkpage newpagefile
-                inject add_link
+                inject add_link add_autofile
                  %config %links %pagestate %wikistate %renderedfiles
                  %pagesources %destsources);
 our $VERSION = 3.00; # plugin interface version, next is ikiwiki version
@@ -743,10 +744,7 @@ sub srcfile_stat {
 }
 
 sub srcfile ($;$) {
-       if (my @stat=srcfile_stat(@_)) {
-               return $stat[0];
-       }
-       return undef
+       return (srcfile_stat(@_))[0];
 }
 
 sub add_underlay ($) {