-1,7 +1,7 |
([[UseModWiki소스수정/사용자의견]] 에 있던 [[역링크]] 개선에 관한 얘기를 이쪽으로 옮깁니다. 멍석을 따로 깔아서... ^_^) |
* 공통적인 부분 |
{{{perl |
{{{#!vim perl |
## 기존함수 수정. |
-127,7 +127,7 |
}}} |
* 원래의 Gypark 역링크 소스수정. |
{{{perl |
{{{#!vim perl |
### 이하, 함수자체를 완전히 수정 또는 추가. |
sub GetPageLinks { |
my ($name, $pagelink, $interlink, $urllink) = @_; |
-167,7 +167,7 |
}}} |
* bab2가 삽질한 역링크 소스. |
{{{perl |
{{{#!vim perl |
## 아래부터는 완전히 새로추가 |
sub DoGetBackSearchLink { |
-400,7 +400,7 |
::::: 만고 생각만 했을때, 그것들만 바꾸고자한다면 지역변수(해쉬)로 읽어들이는 함수를 새로 만들던지 아니면 OpenPage로 페이지를 부르는 부분을 GetPageLinks함수에 왕창 넣어주면 될 것 같기도 합니다만... MacroInclude도 그렇게 해버리면 되겠죠. ㅡ.,ㅡa -- bab2 |
url링크와 inter링크도 따로 저장해서 불릴 수 있게 다시 수정했습니다. 그리고, OpenPage함수를 안쓰려면 그냥 |
{{{perl |
{{{#!vim perl |
sub GetPageLinks { |
.... |
# &OpenPage($name); |
-421,7 +421,7 |
: 예, 다시 테스트해 보겠습니다. 그리고 관리 메뉴에서 페이지 이름을 바꿨을때나 링크를 변경하는 곳도 손을 봐야겠는데요, 위 패치에서 1+2를 쓴다면 |
: |
{{{perl |
{{{#!vim perl |
sub RenameTextLinks { |
... |
if ($changed) { |
-438,5 +438,6 |
: 위의 주석 자리에도 링크를 다시 검사하여 넣으면 될 것 같네요. 좀 봐 주시겠어요? <mysign([[Raymundo]],2003-2-23 11:18 pm)> |
::저렇게 하던지 귀찮으면 &DoMaintain; 해버려도 되겠네요...으흐흐 ^^; |
::근데 페이지 삭제할때는 lnk화일을 어떻게 처리해주나요? <mysign([[Bab2]],2003-2-25 10:57 am)> |
::: 페이지 이름 변경만 신경쓰고 있다가.. 삭제를 잊고 있었습니다. -.-a 긁적... <mysign([[Raymundo]],2003-2-25 11:17 am)> |
---- |
[[위키위키분류]] |