diff options
| author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-03-11 01:07:29 +0000 |
|---|---|---|
| committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-03-11 01:07:29 +0000 |
| commit | c233fd992b318818cdbb88a60fc030076dbd7edc (patch) | |
| tree | d543f39dab5d2a039d8f27079015b92d8c5eadca /ikiwiki | |
| parent | 2aaab7db29f154816d6338a1329b42090209d966 (diff) | |
cgiurl
Diffstat (limited to 'ikiwiki')
| -rwxr-xr-x | ikiwiki | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -23,6 +23,7 @@ my $wikiname="wiki"; my $default_pagetype=".mdwn"; my $cgi=0; my $url=""; +my $cgiurl=""; my $svn=1; sub usage { @@ -262,8 +263,15 @@ sub finalize ($$) { $path=~s/\.\.\/$/index.html/; $pagelink="<a href=\"$path\">$wikiname</a>/ $pagelink"; + my @actions; + if (length $cgiurl) { + push @actions, "<a href=\"$cgiurl?do=edit&page=$page\">Edit</a>"; + push @actions, "<a href=\"$cgiurl?do=recentchanges\">RecentChanges</a>"; + } + $content="<html>\n<head><title>$title</title></head>\n<body>\n". "<h1>$pagelink</h1>\n". + "@actions\n<hr>\n". $content. "</body>\n</html>\n"; @@ -655,6 +663,7 @@ if (grep /^-/, @ARGV) { "svn!" => \$svn, "cgi" => \$cgi, "url=s" => \$url, + "cgiurl=s" => \$cgiurl, ) || usage(); } usage() unless @ARGV == 2; |