urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

foo

master
joey 2006-03-23 08:13:39 +00:00
parent d59734caf6
commit 800dfe6612
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ikiwiki
View File

@ -1,5 +1,4 @@
#!/usr/bin/perl -T
$ENV{PATH}="/usr/local/bin:/usr/bin:/bin";
package IkiWiki;
@ -11,6 +10,10 @@ use lib '.'; # For use without installation, removed by Makefile.
use vars qw{%config %links %oldlinks %oldpagemtime %renderedfiles %pagesources};
sub usage () { #{{{
die "usage: ikiwiki [options] source dest\n";
} #}}}
sub getconfig () { #{{{
if (! exists $ENV{WRAPPED_OPTIONS}) {
%config=(
@ -106,10 +109,6 @@ sub error ($) { #{{{
die @_;
} #}}}
sub usage () { #{{{
die "usage: ikiwiki [options] source dest\n";
} #}}}
sub possibly_foolish_untaint ($) { #{{{
my $tainted=shift;
my ($untainted)=$tainted=~/(.*)/;