4 번째 수정본 소스 보기 : UseModWiki소스수정/입력한그대로출력

내용출력
로그인[l]
수정할 수 없습니다: UseModWiki소스수정/입력한그대로출력 는 읽기 전용 페이지입니다.
== {{{ }}} 태그 개선 및 SyntaxHighlighting 지원 ==
* [[사용자입력을그대로출력하기]]를 위한 패치

* 부작용: 몇 달 동안 사용하는 도중에 문제가 된 적은 없었다.
** 기존에 {{{ }}} 태그를 사용했던 페이지들이 제대로 출력되지 않을 수 있으니 점검할 것
** SyntaxHighlighting 을 많이 사용한 페이지는 경우 로딩 속도가 느려지니 주의

* wiki.pl 수정: 워낙 오래 전에 수정한 데다가 이곳 저곳 두서없이 뜯어고치는 바람에.. 이제 와서 정리하려 해도 엄두가 나지 않는다.. 생략함. :-)

== Notes ==
{{{ }}} 내부에 있는 [[위키네임]]이나 이중 대괄호쌍이 있을 경우, 본문 출력시에는 이들을 링크로 간주하지 않으나 역링크 검색이나 전체 링크 목록 출력 화면에서는 링크로 간주한다. 이것을 막으려면 다음을 수정한다.

{{{perl
sub GetPageLinks {
    ...
    $text =~ s/<code>(.|\n)*?\<\/code>/ /ig;
### 다음 두 줄 추가
    $text =~ s/(^|\n)\{\{\{[ \t\r\f]*\n((.|\n)*?)\n\}\}\}[ \t\r\f]*\n/ \n/igm;
    $text =~ s/(^|\n)\{\{\{([a-zA-Z0-9+]+)(\|(n|\d*|n\d+|\d+n))?[ \t\r\f]*\n((.|\n)*?)\n\}\}\}[ \t\r\f]*\n/ \n/igm;
### 여기까지
    if ($interlink) {
        $text =~ s/''+/ /g;  # Quotes can adjacent to inter-site links
    ...
}
}}}
- 2003.2.7.

source-highlight 유틸리티가 지원하는 언어 목록을 해쉬변수에 담아서 사용했었는데, 너무도 직관적이지 않은 형태가 되어서... SRCHIGHLANG 환경변수를 배열로 지정하고 실제로 호출될 때 루프를 돌면서 지원 언어 목록을 검색하도록 수정하였다. 다음과 같이 수정한다.
: config.pl 에서는
:
{{{perl
### source-highlight 의 경로명
$SOURCEHIGHLIGHT    = "/usr/local/bin/source-highlight";    # path of source-highlight
### source-highlight 에서 옵션으로 줄 수 있는 언어 목록을 아래와 같이 배열로 지정한다.
@SRCHIGHLANG = qw(cpp java prolog perl php3 python flex changeelog);
}}}
: wiki.pl 에서는
:
{{{perl
###############
### added by gypark
### 패치를 위해 추가된 환경설정 변수
use vars qw(
    $UserGotoBar $UserGotoBar2 $UserGotoBar3 $UserGotoBar4
    $ConfigFile $SOURCEHIGHLIGHT @SRCHIGHLANG $LinkFirstChar   # %SRCHIGHLANG 을 @SRCHIGHLANG 으로 바꾼다.
    $EditGuideInExtern $SizeTopFrame $SizeBottomFrame
    $LogoPage $CheckTime $LinkDir $IconDir
    );
###
###############
}}}
:
{{{perl
sub StoreSyntaxHighlight {
    my ($lang, $opt , @code) = @_;

    my %LANG;                    # 추가
    foreach (@SRCHIGHLANG) {     # 추가
        $LANG{$_} = "1";         # 추가
    }                            # 추가

    if (!((-x "$SOURCEHIGHLIGHT") && defined($LANG{$lang}))) {  # 수정
        return &StoreCodeRaw(@code);
    }
    ... 이하 이전과 동일 ...
}
}}}
<mysign([[Raymundo]],2003-3-5 1:27 am)>

----
[[위키위키분류]]
UseModWiki소스수정/입력한그대로출력 페이지로 돌아가기 | 다른 수정본 보기