2007年8月21日アーカイブ

MT 4.0 に上げてから、月別アーカイブなどで使用している MTEntriesタグでsort_order="ascend"が効かなくなった。
いろいろ調べてみたら、sort_byとか言う属性もあるようなので指定してみたけど変わらず。
結局、ソースを追いかけたらどうもMTのバグらしい。
lib/MT/Template/ContextHandlers.pm に以下のパッチをあてたら、無事にsort_order="ascend"が効くようになった。
どうも、perlの$と@と%と#と\の関係が良くわかってないので、デバッグにも苦労する。

*** ContextHandlers.pm.ORIG  2007-08-04 06:20:03.000000000 +0900
--- ContextHandlers.pm 2007-08-21 00:04:34.000000000 +0900
***************
*** 2917,2929 ****
          if ( $col ne 'score' ) {
              if (my $def = $class->column_def($col)) {
                  if ($def->{type} =~ m/^integer|float$/) {
!                     @entries = $so eq 'ascend' ?
!                         sort { $a->$col() <=> $b->$col() } @entries :
!                         sort { $b->$col() <=> $a->$col() } @entries;
                  } else {
!                     @entries = $so eq 'ascend' ?
!                         sort { $a->$col() cmp $b->$col() } @entries :
!                         sort { $b->$col() cmp $a->$col() } @entries;
                  }
                  $no_resort = 1;
              }
--- 2917,2929 ----
          if ( $col ne 'score' ) {
              if (my $def = $class->column_def($col)) {
                  if ($def->{type} =~ m/^integer|float$/) {
!                     @$entries = $so eq 'ascend' ?
!                         sort { $a->$col() <=> $b->$col() } @$entries :
!                         sort { $b->$col() <=> $a->$col() } @$entries;
                  } else {
!                     @$entries = $so eq 'ascend' ?
!                         sort { $a->$col() cmp $b->$col() } @$entries :
!                         sort { $b->$col() cmp $a->$col() } @$entries;
                  }
                  $no_resort = 1;
              }

MT 4.0になって、今までのブックマークレットが使えなくなった。
新しいブックマークレットはどこにあるのかさんざん探したら、なんと記事の作成ページにあった。
さっそく、ブックマークを更新して試してみたところ、なんか格好悪いです。
引用元のタイトルがentryのタイトルになって、「引用元のURL<br/><br/>引用部分」が本文に入力されます。
そういえば、ここはもともと気に入らなくて直していたんだった。とは言え、昔のバージョンだと、URLと引用部分は別のパラメータでmt.cgiに渡っていたのに、MT4.0では一つのパラメータで<br/><br/>を挟んで渡してくれている。さらに、今まではブックマークレットから投稿するときにblogが選べたのに、今回はブックマークレットの中にblog_idが埋め込まれていて、必須項目になっている。blogを複数持っていたら、ブックマークレットも複数登録しろと言うのだろうか。
blog_idについては選択画面そのものがなくなっているようなのでとりあえずは諦めて、引用部分を自分好みに変える。
lib/MT/App/CMS.pmを以下のように修正した。

*** CMS.pm.ORIG Tue Aug 21 23:03:38 2007
--- CMS.pm      Tue Aug 21 23:17:45 2007
***************
*** 4647,4653 ****
      my $blog_id = $app->blog->id;
      my %args    = ( '_type' => $type, blog_id => $blog_id, qp => 1 );
      my $uri = $app->base . $app->uri( 'mode' => 'view', args => \%args );
! qq!javascript:d=document;w=window;t='';if(d.selection)t=d.selection.createRange().text;else{if(d.getSelection)t=d.getSelection();else{if(w.getSelection)t=w.getSelection()}}void(w.open('$uri&title='+encodeURIComponent(d.title)+'&text='+encodeURIComponent(d.location.href)+encodeURIComponent('<br/><br/>')+encodeURIComponent(t),'_blank','scrollbars=yes,status=yes,resizable=yes,location=yes'))!;
  }

  sub apply_log_filter {
--- 4647,4653 ----
      my $blog_id = $app->blog->id;
      my %args    = ( '_type' => $type, blog_id => $blog_id, qp => 1 );
      my $uri = $app->base . $app->uri( 'mode' => 'view', args => \%args );
! qq!javascript:d=document;w=window;t='';if(d.selection)t=d.selection.createRange().text;else{if(d.getSelection)t=d.getSelection();else{if(w.getSelection)t=w.getSelection()}}void(w.open('$uri&title='+encodeURIComponent(d.title)+'&link='+encodeURIComponent(d.location.href)+'&text='+encodeURIComponent(t),'_blank','scrollbars=yes,status=yes,resizable=yes,location=yes'))!;
  }

  sub apply_log_filter {
***************
*** 5292,5297 ****
--- 5292,5304 ----
                if $data;
              $q->param( $_, $encoded );
          }
+       my $title = $q->param('title');
+       my $link = scalar $q->param('link');
+       my $text = $q->param('text');
+       $text = sprintf qq(<blockquote>\n<div class="quote-head"><a title="%s" href="%s">%s</a></div>\n\n%s\n</blockquote>), $title, $link, $title, $text;
+       $q->param('title', '');
+       $q->param('link', '');
+       $q->param('text', $text);
      }

      $param{autosave_frequency} = $app->config->AutoSaveFrequency;

この修正を入れると、

<blockquote>
<div class="quote-head"><a title="引用元のタイトル" href="引用元のURL">引用元のタイトル</a></div>

引用部分
</blockquote>

のような感じで本文に入るようになる。