|(| 또는 < 또는 >)[v[숫자]]
** 자세한 내용은 [[표만들기]]를 참조하라.
* 기존에 수정했던 패치가, 비슷한 코드가 세 번씩 반복되는 터라 다시 수정할 때 상당히 번거로왔다. 2002년11월27일 새로 수정
** |v 는 사용할 수 없게 되었다.
* 부작용:
** 테이블 내에 들어가는 텍스트에 부등호 등이 들어가면 제대로 출력되지 않을 수 있으니, || 등의 구분자와 셀에 들어가는 텍스트 사이에 공백을 두라.
** 웹브라우저가 복잡한 표를 표시하지 못한다면 예상치 못한 출력이 나타날 수 있다.
:
{{{#!vim perl
sub CommonMarkup {
...
if ($doLines) { # 0 = no line-oriented, 1 or 2 = do line-oriented
...
if ($UseHeadings) {
s/(^|\n)\s*(\=+)\s+([^\n]+)\s+\=+/&WikiHeading($1, $2, $3)/geo;
### 다음 줄을 주석처리하고 그 아래의 내용을 추가한다.
# s/((\|\|)+)/"<\/TD>"/ge if $TableMode;
my %td_align = ("&__LT__;", "left", "&__GT__;", "right", "|", "center");
s/((\|\|)*)(\|(&__LT__;|&__GT__;|\|)((v(\d*))?))/"<\/TD> | "/ge if $TableMode;
### 여기까지
}
}
...
}
}}}
:
{{{#!vim perl
sub WikiLinesToHtml {
my ($pageText) = @_;
my ($pageHtml, @htmlStack, $code, $depth, $oldCode);
my ($tag);
### 다음 라인 추가
my %td_align = ("&__LT__;", "left", "&__GT__;", "right", "|", "center");
###
...
foreach (split(/\n/, $pageText)) { # Process lines one-at-a-time
...
} elsif (/^[ \t].*\S/) {
$code = "PRE";
$depth = 1;
### 다음 단락은 주석처리하고 그 아래의 내용을 추가한다
# } elsif (s/^((\|\|)+)(.*)\|\|\s*$/" | $3<\/TD><\/TR>\n"/e) {
# $code = 'TABLE';
# $TableMode = 1;
# $depth = 1;
} elsif (s/^((\|\|)*)(\|(&__LT__;|&__GT__;|\|)((v(\d*))?))(.*)\|\|\s*$/" |
"
. ""
. $8 . "<\/TD><\/TR>\n"/e) {
$code = 'TABLE';
$TableMode = 1;
$depth = 1;
### 여기까지
} elsif (/^IMG:(.*)$/) { # luke added
StoreImageTag($1);
...
}
...
}
}}}
* 위에서 등장하는 "&__LT__;" 와 "&__GT__;" 는 {{{ }}} 태그, 즉 [[사용자입력을그대로출력하기]]를 지원하기 위하여 도입된 문자열이다. 저 문자열을 처음 본다면, 또는 자신이 가지고 있는 wiki.pl 내에 저런 문자열이 없다면, 저 문자열 대신에 각각 "<" 와 ">" 를 넣어야 된다.
----
[[위키위키분류]]
UseModWiki소스수정/테이블 페이지로 돌아가기 | 다른 수정본 보기
|