Nyxity/위키소스관련

• UseModWiki소스수정/diff출력개선 - 기능 캔슬할것
• UseModWiki소스수정/RSS에Diff출력
• mysign 은 mysign.pl에서 div 태그를 제거
• UseModWiki소스수정/Threads에구글광고삽입

  my $MyAdCounter;      # 전역변수는 이 앞에 적어 주시고
  
  sub MacroThread {
      my ($itself, $id, $up, $long, $threadindent) = @_;
      my $txt;
  
      if ($threadindent > 0) {
          my $marginleft = 0;
          $marginleft = 3.3*($threadindent-1) if ($threadindent > 0);
          $txt .= "<DIV class='threadreply' style='margin-left: $marginleft"."em'>";
      } else {
          $txt .= "<DIV class='threadnew'>";
      }
      $txt .= &MacroComments($itself, $id, $up, $long, $threadindent)."</DIV>";
      if ($threadindent >= 1) {
          $txt .= "<A name='$up'></A>";
      }
  
      if (int(rand(0)) == 0 and $MyAdCounter < 100) {        # 여기서부터 닫는 중괄호까지 추가
          $MyAdCounter++;
          $txt .= <<EOF
  <p />
  <div>
  구글 광고 스크립트
  </div>
  EOF
      }
  
      return $txt;
  }
  

• 스레드 창 닫아 놓기 wiki.pl에서 다음을 설정

  if ($threadindent ne '') {
  		if ($threadindent >= 0) {	# "새글쓰기"도 감추고 싶다면 1 대신 0으로 할 것
  

• 더블클릭으로 편집모드 전환되는 것을 막기

  sub GetHtmlHeader {
      ....
  # 주석처리  $bodyExtra .= qq(ondblclick="location.href='$ScriptName?action=edit&id=$id'");
      ....
  }
  

• 이모티콘 관련 표 매기기 을 위해 아래 부분 수정

   sub EmoticonSubst {
         ...중략...
  
  #		$txt =~ s/(\s)\:[-]*\)([^A-z])/$1$e4$2/g; (\s)를 없애준다.
  		$txt =~ s/\:[-]*\)([^A-z])/$1$e4$2/g;
  

• 페이지 하단 편집메뉴란에 구글광고 삽입

  sub GetEditGuide {
  	my ($id, $rev) = @_;
  	my $result = "\n<HR class='footer'>\n<DIV class='editguide'>";
  #		print "<HR class='footer'>\n"  if (!&GetParam('embed', $EmbedWiki));
  # 구글광고
     $result .= <<EOF;
  <DIV style="float: left">
  여기에 구글광고 코드 삽입
   </DIV>
  EOF
  # 여기까지
  

• ISBN매크로에 TTB 키값달기

  my $aladdin_url = "http://www.aladdin.co.kr/shop/wproduct.aspx?ISBN=$num&TTBKey=ttb키값";