@@ -1904,7 +1904,7 @@
### page 처음에 bottom 으로 가는 링크를 추가
### #EXTERN
if (&GetParam('InFrame','') eq '') {
- $result .= "\n<div align=\"right\"><a accesskey=\"z\" name=\"PAGE_TOP\" href=\"#PAGE_BOTTOM\">". T('Bottom')." [b]" . "</a></div>\n";
+ $result .= "\n<div class=\"gobottom\" align=\"right\"><a accesskey=\"z\" name=\"PAGE_TOP\" href=\"#PAGE_BOTTOM\">". T('Bottom')." [b]" . "</a></div>\n";
}
###
###############
@@ -3436,7 +3436,7 @@
"</A>";
$link_html .= "<A class='inter' href='$url' title='$id'>$remotePage</A>";
### 외부 URL 을 새창으로 띄울 수 있는 링크를 붙임
- $link_html .= "<a href=\"$url\" target=\"_blank\"><img src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>";
+ $link_html .= "<a href=\"$url\" target=\"_blank\"><img class=\"newwindow\" src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>";
return ($link_html, $punct);
###
###############
@@ -3475,7 +3475,7 @@
$link_html = "<A class='inter' href='$url' title='$id'>[$text]</A>" .
### 외부 URL 을 새창으로 띄울 수 있는 링크를 붙임
"<a href=\"$url\" target=\"_blank\">" .
- "<img src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\">" .
+ "<img class=\"newwindow\" src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\">" .
"</a>";
return &StoreRaw($link_html);
###
@@ -3919,7 +3919,7 @@
### 외부 URL 을 새창으로 띄울 수 있는 링크를 붙임
### from http://whitejames.x-y.net/cgi-bin/jofcgi/wiki/wiki.pl?프로그래밍팁/Wiki
# return ("<a href=\"$name\">$name</a>", $punct);
- return ("<A class='outer' href=\"$name\">$protocol$name</A><a href=\"$name\" target=\"_blank\"><img src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>", $punct);
+ return ("<A class='outer' href=\"$name\">$protocol$name</A><a href=\"$name\" target=\"_blank\"><img class=\"newwindow\" src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>", $punct);
###
###############
}
@@ -3936,7 +3936,7 @@
### 외부 URL 을 새창으로 띄울 수 있는 링크를 붙임
### from http://whitejames.x-y.net/cgi-bin/jofcgi/wiki/wiki.pl?프로그래밍팁/Wiki
# return &StoreRaw("<a href=\"$url\">[$text]</a>");
- return &StoreRaw("<A class='outer' href=\"$url\">[$text]</A><a href=\"$url\" target=\"_blank\"><img src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>");
+ return &StoreRaw("<A class='outer' href=\"$url\">[$text]</A><a href=\"$url\" target=\"_blank\"><img class=\"newwindow\" src=\"$IconDir/newwindow.gif\" border=\"0\" alt=\"" . T('Open in a New Window') . "\" align=\"absbottom\"></a>");
###
###############
}
diff -u -r1.293 -r1.295
--- wiki.pl 13 Mar 2005 07:57:50 -0000 1.293
+++ wiki.pl 6 Apr 2005 02:02:29 -0000 1.295
@@ -1790,7 +1790,7 @@
if ($FreeLinks) {
$title =~ s/_/ /g; # Display as spaces
}
- $result .= &GetHtmlHeader("$SiteName: $title", $title);
+ $result .= &GetHtmlHeader("$title : $SiteName", $title);
###############
### pda clip by gypark
if ($IsPDA) {
@@ -5210,7 +5210,7 @@
sub DoPreview {
$ClickEdit = 0;
print &GetHttpHeader();
- print &GetHtmlHeader("$SiteName: " . T('Preview'), "Preview");
+ print &GetHtmlHeader(T('Preview') . " : $SiteName", "Preview");
###############
### replaced by gypark
### 미리보기에서 <mysign> 등의 preprocessor 사용
@@ -8062,7 +8062,7 @@
my $result;
print &GetHttpHeader();
- print &GetHtmlHeader("$SiteName : ". T('Upload File'), "");
+ print &GetHtmlHeader(T('Upload File') . " : $SiteName", "");
print $q->h2(T('Upload File')) . "\n";
if (!(&UserCanEdit("",1))) {
print T('Uploading is not allowed');
@@ -8189,7 +8189,7 @@
my $mode = &GetParam('mode','paint');
print &GetHttpHeader();
- print &GetHtmlHeader("$SiteName : ". T("Oekaki $mode"), "");
+ print &GetHtmlHeader(T("Oekaki $mode") . " : $SiteName", "");
print $q->h2(T('Oekaki')) . "\n";
if (!(&UserCanEdit("",1))) {
print T('Oekaki is not allowed');
@@ -8862,7 +8862,7 @@
}
print &GetHttpHeader();
- print &GetHtmlHeader("$SiteName : ". &T('Send Trackback Ping'), "");
+ print &GetHtmlHeader(&T('Send Trackback Ping') . " : $SiteName", "");
print $q->h2(&T('Send Trackback Ping')) . "\n";
print $result;
print "<hr size='1'>".Ts('Return to %s' , &GetPageLink($id));
diff -u -r1.273 wiki.pl
--- wiki.pl 19 Feb 2005 06:28:42 -0000 1.273
+++ wiki.pl 26 Feb 2005 06:26:56 -0000
@@ -4842,6 +4842,7 @@
($status, $data) = &ReadFile("$DataDir/banlist");
return 0 if (!$status); # No file exists, so no ban
+ $data =~ s/\r//g;
$ip = $ENV{'REMOTE_ADDR'};
$host = &GetRemoteHost(0);
foreach (split(/\n/, $data)) {
@@ -7369,15 +7370,17 @@
$banList = "" if (!$status);
print &GetFormStart();
print GetHiddenValue("edit_ban", 1), "\n";
- print "<b>Banned IP/network/host list:</b><br>\n";
print "<p>Each entry is either a commented line (starting with #), ",
- "or a Perl regular expression (matching either an IP address or ",
- "a hostname). <b>Note:</b> To test the ban on yourself, you must ",
- "give up your admin access (remove password in Preferences).";
- print "<p>Examples:<br>",
- "\\.foocorp.com\$ (blocks hosts ending with .foocorp.com)<br>",
- "^123.21.3.9\$ (blocks exact IP address)<br>",
- "^123.21.3. (blocks whole 123.21.3.* IP network)<p>";
+ "or a Perl regular expression (matching either an IP address or ",
+ "a hostname). <b>Note:</b> To test the ban on yourself, you must ",
+ "give up your admin access (remove password in Preferences).";
+ print "<p>Example:<br>",
+ "# blocks hosts ending with .foocorp.com<br>",
+ "\\.foocorp\\.com\$<br>",
+ "# blocks exact IP address<br>",
+ "^123\\.21\\.3\\.9\$<br>",
+ "# blocks whole 123.21.3.* IP network<br>",
+ "^123\\.21\\.3\\.\\d+\$<p>";
print &GetTextArea('banlist', $banList, 12, 50);
print "<br>", $q->submit(-name=>'Save'), "\n";
print "<hr class='footer'>\n";
![[첫화면으로]](/raymundo_logo.jpg){kind=logo}
UseModWiki소스수정/History
UseModWiki소스수정/원본텍스트_표시하기에서. 박수!
action=index 개선
AlbireoWiki 추가
forXtra님 위키 추가