16 번째 수정본
이 자리에 JustSameJuanmaMP 페이지의 내용을 적은 후에 아래의 분류를 적절히 지정해주세요. 마땅한 분류가 없다면 그냥 기타분류로 놓아 두세요.
기타분류
내 한국어 능력에 대한 죄송합니다, 내가 여기서 멀리 떨어져 살아! :O
I would like suggest something like this for DoubleClick feature (sorry if there are mistakes but I try to express the idea):
sub GetHtmlHeader {
...
+ $revision = &GetParam('revision', '');
+ if ($revision && &UserCanEdit($id,0)) {
+ $bodyExtra .= qq| ondblclick="location.href='$ScriptName${\&ScriptLinkChar()}action=edit&id=$id&revision=$revision'"|;
+} else {
+ $bodyExtra .= qq| ondblclick="location.href='$ScriptName${\&ScriptLinkChar()}action=edit&id=$id'" |;
}
내가 좋아하는 UseMod 0.92K3감사합니다!
Hi to all,
1) I'm doing another usemodkr + usemod merge. For this occasion I decided to save these files as meta-values. "Cnt" into the same directory than the pages (as the old .. "lck" of primal usemod. I thought so you can save operations, mainten not have to create new directories neither to be declarated before (fewer operations).
I can understand that this proposal can not to be put in production (makes it impossible to migrate without a converter script). But I wanted to comment like another point of view. (I can not talk about this to my neighbor, I'm not sure that he can understand me :))).
2) Again, there's interesting inputs from Usemodkr. for instance, about ". cnt files. I have made a contribution in my wiki, with this snippet that is for "previous viewed" that saves the last time that it was seen. It seems work fine.
Greetings.
--JuanmaMP (aka, The foreigner:)) (I have not really traveled much, so I enjoy this appellation is a new experience!)
Yes, you're right. There are no important reason to place ".cnt" files in the different directory. I can't remember exactly, but maybe I decided to do so because...:
1) When I added "page hit counter" feature, I was just a Perl newbie and I didn't know the entire structure of the source code of usemod. (And I don't know now, either ^^) So I just referred to the way that original usemod save the keep files (".kp"). They are saved in "keep" directory, so .cnt files are saved "count" directory. :-)
2) As I modified Usemodkr, I had to check that metafiles were created, modified, and removed correctly by wiki operation. I checked it using terminal and shell command (like ls, cd etc.) Therefore, it was easier for me to check it when files are stored in a different directory than when they are in the same directory.
Thanks for good pointing.
Yes, indeed, keep files can be stored in the same "pages" directory, too. Perhaps, the original one is a more readable decision.
Thanks to you.
EditIntermap
I like this feature: edit Intermap via web. I have re-used editbanned code with other point of view, and that's all.
For instance, after sub DoUpdateBanned (completely optional):
+ sub DoEditIntermap {
+ my ($intermapList, $status);
+
+ print &GetHeader("", "Editing IntermapList", "");
+ print "\n";
+ return if (!&UserIsAdminOrError());
+ ($status, $intermapList) = &ReadFile("$DataDir/intermap");
+ $intermapList = "" if (!$status);
+ print &GetFormStart();
+ print GetHiddenValue("edit_intermap", 1), "\n";
+ print &GetTextArea('intermaplist', $intermapList, 12, 100);
+ print "<br>", $q->submit(-name=>'Save'), "\n";
+ print $q->endform;
+ print '</div>' . &GetCommonFooter();
+ }
+
+ sub DoUpdateIntermap {
+ my ($newList, $fname);
+
+ print &GetHeader("", "Updating Intermap list", "");
+ return if (!&UserIsAdminOrError());
+ $fname = "$DataDir/intermap";
+ $newList = &GetParam("intermaplist", "#Empty file");
+ if ($newList eq "") {
+ print "<p>Empty intermap list or error.";
+ print "<p>Resubmit with at least one space character to remove.";
+ } elsif ($newList =~ /^\s*$/s) {
+ unlink($fname);
+ print "<p>Removed intermap list";
+ } else {
+ &WriteStringToFile($fname, $newList);
+ print "<p>Updated intermap list";
+ }
+ print '</div>' . &GetCommonFooter();
+ }
Sub GetAdminBar {
....
$result .= &ScriptLink("action=editbanned", T("Edit Banned List"));
+ $result .= ' | ' . &ScriptLink("action=editintermap",T("Intermap"));
...
}
Sub DoOtherRequest {
...
} elsif ($action eq "editbanned") {
&DoEditBanned();
+ } elsif ($action eq "editintermap") {
+ &DoEditIntermap();
...
sub DoOtherRequest {
...
if (&GetParam("edit_ban", 0)) {
&DoUpdateBanned();
return;
}
+ if (&GetParam("edit_intermap", 0)) {
+ &DoUpdateIntermap();
+ return;
+ }
If the script runs as "www-data", then the wikidb, etc. files must also be owned by "www-data", (apache2 runs as user www-data, for instance). See the documentation of your web server for details.
(Sorry for readers of UseModWiki, it's duplicated there. I hope it isn't annoyance)
Hope it's fun!.
--JuanmaMP
Just for test:
Samples of links: .TestForLinks
To:
.... Diary/301동식당의미스테리
JuanmaMP
SandBox
Sandbox
.... UseModWiki소스수정/AllPagesTo매크로
.... UseModWiki소스수정/GetFullLinkList함수
.... UseModWiki소스수정/goto매크로버그
.... UseModWiki소스수정/문자열일괄치환
.... UseModWiki소스수정/섹션단위수정
From:
![[첫화면으로]](/raymundo_logo.jpg){kind=logo}
JustSameJuanmaMP
There is JuanmaMP already. :-D
I understand that your suggestion is:
When viewing old revision of a page, double clicking goes to "edit this revision", rather than "edit current version"
Am I right? I think your suggestion makes sense. I'll edit wiki source as soon as possible.
yes, you're right. It's just what I mean.
Congrats for your scripts!. Best Regards.
(By the way JuanmaMP and JustSameJuanmaMP are the same guy) :)
- I know it, of course~ :-D You are the only foreigner that comes here. How can I forget you?
-- Raymundo 2009-7-20 11:30 pm
Your suggestion is applied in "ext2.12": UseModWiki소스수정/이전수정본화면에서더블클릭I just meant that you can use JuanmaMP as your page, that is, you don't need to create a new page everytime you visit here ^_^.
Anyway (now, more seriously), It's an honour participating here.
Thanks for implementing.
(Sorry, I forget my previous passwords, so I have scored this)