6 번째 수정본 소스 보기 : UseModWiki소스수정/AllPagesFrom매크로

내용출력
로그인[l]
수정할 수 없습니다: UseModWiki소스수정/AllPagesFrom매크로 는 읽기 전용 페이지입니다.
== allpagesfrom 매크로 추가 ==
* 특정한 페이지 안에 있는 링크의 목록을 출력하는 매크로. <allpagesto> 와 반대의 개념.

* 필수 요구 사항:
** [[/RemoveLink함수]] 패치가 적용되어 있어야 한다
* 선택 요구 사항:
** [[/링크를별도의화일로관리]] 패치를 적용해야 속도 저하를 피할 수 있음

* 사용법 - <allpagesfrom(페이지이름[,옵션])>
** 페이지이름은 "페이지" 또는 "상위페이지/하위페이지"의 형식이다. "/하위페이지"는 지원하지 않는다.
** 옵션은 0,1,2 중의 하나. 생략하면 기본값은 2 이다.
*** 0 - 현재 존재하지 않는 페이지에 대한 링크만 출력
*** 1 - 현재 존재하는 페이지에 대한 링크만 출력
*** 2 - 모든 링크를 출력
:
{{{#!vim perl
sub MacroSubst {
    ...
### 다음라인 추가
    $txt =~ s/\&__LT__;allpagesfrom\(([^,\n]+)(,\d)?\)\&__GT__;/&MacroAllPagesFrom($1, $2)/gei;
###
    return $txt;
}
}}}
:
{{{#!vim perl
### 다음 함수를 통채로 추가
sub MacroAllPagesFrom {
    my ($string, $exists) = @_;
    my (@x, @links, $pagename, %seen, %pgExists);
    my $txt;

    $string = &RemoveLink($string);
    $string = &FreeToNormal($string);
    if (&ValidId($string) ne "") {
        return "<allpagesfrom($string)>";
    }

    if ($exists =~ /,(\d)/) {
        $exists = $1;
    } else {
        $exists = 2;
    }

    %pgExists = ();
    foreach $pagename (&AllPagesList()) {
        $pgExists{$pagename} = 1;
    }

###############
### replaced by gypark
### 링크 목록을 별도로 관리 패치를 적용한 경우는 두번째 라인을, 그렇지 않다면 첫번째 라인을 쓸 것
#   @x = &GetPageLinks($string, 1, 0, 0);
    @x = &GetPageLinksFromFile($string, 1, 0, 0);
###
###############

    foreach $pagename (@x) {
        $pagename = (split('/',$string))[0]."$pagename" if ($pagename =~ /^\//);
        if ($seen{$pagename} != 0) {
            next;
        }
        if (($exists == 0) && ($pgExists{$pagename} == 1)) {
            next;
        }
        if (($exists == 1) && ($pgExists{$pagename} != 1)) {
            next;
        }
        $seen{$pagename}++;
        push (@links, $pagename);
    }
    @links = sort(@links);

    foreach $pagename (@links) {
        $txt .= ".... "  if ($pagename =~ m|/|);
        $txt .= &GetPageOrEditLink($pagename) . "<br>";
    }

    return $txt;
}
}}}

=== # 추가 업데이트 내역 ===
ext1.90 - [[/매크로파라메터에이중대괄호허용]]함 <mysign([[Raymundo]],2005-11-19 6:09 pm)>

=== # 사용자 의견 ===

<a href=http://cyberbuzz.gatech.edu/customize/guestbook/archives0517/73459.html>Ambien online</a> \\
<a href=http://cyberbuzz.gatech.edu/customize/guestbook/archives0517/46234.html>Buy levitra</a> \\
<a href=http://cyberbuzz.gatech.edu/customize/guestbook/archives0517/38673.html>Buy paxil</a> \\
<a href=http://cyberbuzz.gatech.edu/customize/guestbook/archives0517/84524.html>Buy viagra</a> \\
 \\
<a href=http://www.loyno.edu/~gregoire/guestbook/200603/message145.html>Order tramadol</a> \\
<a href=http://www.loyno.edu/~gregoire/guestbook/200603/message387.html>Viagra online</a> \\
<a href=http://www.loyno.edu/~gregoire/guestbook/200603/message634.html>Viagra pill</a> \\
<a href=http://www.loyno.edu/~gregoire/guestbook/200603/message441.html>Viagra</a> <mysign(testrk,2007-4-11 1:02 pm)>
<longcomments(100)>


----
[[위키위키분류]]
UseModWiki소스수정/AllPagesFrom매크로 페이지로 돌아가기 | 다른 수정본 보기