これ [2005-
私の場合は,
辺りかなあ.皆さんどうですか?
だいぶ前にいじった気がするけど,書き忘れてたので思い出しながらメモしておく.
月ごとの日付一覧をカレンダ風に表示するときに,ちまたの blog ツールだと,前月や翌月へのリンクが表示されていたりする.無きゃ困るわけでも,あるとすごく便利なわけでもないけど,何となく欲しくなったのでつけてみた.もうちょっときれいに作れたかもしれないけど,とりあえずこんな感じ.
chalow-
まず
## # HTML ファイルの出力 write_ index_ page() ;
の直前に
my @month_ array = sort keys % month_ page; my % month_ array_ rev = () ; for (my $ i = 0; $ i < @ month_ array; $ i+ + ) { $ month_ array_ rev{$ month_ array[$ i] } = $ i; }
を入れる.同じようなものを write_
次に make_
my @wn = (" Su" , " Mo" , " Tu" , " We" , " Th" , " Fr" , " Sa" ) ;
の直前に,
my $idx = $ month_ array_ rev{$ ym} ; my ($ link_ before, $ link_ after) = (' <<' , ' >>' ) ; if ($ idx > 0) { $ link_ before = ' <a href= " ' . $ month_ array[$ idx - 1] . ' . html" ><<</ a>' ; } if ($ idx < @ month_ array - 1) { $ link_ after = ' <a href= " ' . $ month_ array[$ idx + 1] . ' . html" >>></ a>' ; }
を入れる.
同関数のヒアドキュメント内で
<caption><a href=" $ ym. html" >$ ym</ a></ caption>
の代わりに
<tr> <td align=" center" colspan= 2>$ link_ before</ td> <td align= " center" colspan= 3><a href= " $ ym. html" >$ ym</ a></ td> <td align= " center" colspan= 2>$ link_ after</ td> </ tr>
とする.以上.
しかしアレだ.自分仕様パッチが複数の改造目的から成り立っていると,そのうち一部の目的のものだけ切り出して配布するってのが面倒だな.各要素ごとにオリジナルからのパッチの形でまとめて,かつそれらを順不同で適用できるように直交化しておく…とかできると理想だけど,そういうの自動化できたりしませんか.つうかできたら cvs の手動マージ機能とか要らないって話ですかそうですか.
「COBOL がかっこいい」とはまた新機軸な (←とか言うな
2012 :
2011 :
2010 :
2009 :
2008 :
2007 :
2006 :
2005 :
2004 :
2003 :
2002 :
2001 :
2000 :
1999 :
1998 :
1997 :
1996 :
最終更新時間: