UseModWiki소스수정/IMG태그

IMG: 태그 개선

• K3 버전에 있는 (오리지널에는 없음) IMG: 태그의 경우, 한 페이지에서 단 한 번 밖에 사용할 수 없었다. 여러 번 사용해도 마지막에 선언된 것이 모든 이미지에 적용된다. 게다가 이 extended 버전에서는 작동하지 않는다.
• 각 이미지마다 별도로 옵션을 줄 수 있도록 수정
• 사용법:

IMG:옵션 이미지경로

또는

IMG:옵션
이미지경로

• 위와 같이 적으면, <img 옵션 src="이미지경로" alt="이미지경로"> 로 치환된다.
• "IMG:옵션" 구문만 단독으로 사용되는 것은 아무런 효과가 없다. (기존 K3 소스에 의해서 NULL 로 치환만 된다)

sub CommonMarkup {
    ...
        s/\[$InterLinkPattern\]/&StoreBracketInterPage($1, "")/geo;
### 다음 라인 추가.
        s/IMG:([^<>\n]*)\n?$UrlPattern/&StoreImgUrl($1, $2, $useImage)/geo;
###
        s/$UrlPattern/&StoreUrl($1, $useImage)/geo;
    ...
}

### 다음 함수를 통채로 추가
sub StoreImgUrl {
    my ($imgTag, $name, $useImage) = @_;
    my ($link, $extra);

    $ImageTag = $imgTag;
    ($link, $extra) = &UrlLink($name, $useImage);
    # Next line ensures no empty links are stored
    $link = &StoreRaw($link)  if ($link ne "");
    $ImageTag = "";
    return $link . $extra;
}