POST to The wildcat of a wilderness

writbackplus_custom_06 hack Categories [] [2004 11 08(Mon) posted at 21:24]

をいじってデータの格納順を変え、dateの形式を変えてしまうrecentwritebacks_treeのdateをいじるとソートが面倒っぽいむしろキャッシュファイル作った方がTrackbackとComment両方ある場合両方カウントされてしまうのを防げるのでよいと思う以下plugin内部の変更8-10行package writeback;package writeback;use vars qw($trackback_flavour $writeback_response $trackback_response);use vars qw($count $writebacks $cm_count $tb_count $trackbacks $comments);use vars qw($last_cm_date $last_cm_name);385-389行sub story {my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_; $path =~ s!^/*!!; $path &&= "/$path";my %param = ();sub story {my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_; $path =~ s!^/*!!; $path &&= "/$path";($count, $writebacks, $cm_count, $comments, $tb_count, $trackbacks) = (0, '', 0, '', 0, '');($last_cm_date, $last_cm_name) =(''.'');my %param = (); 403行my $writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path,'writeback','general') || 'Name/Blog: $writeback::name$writeback::blog_name URL: $writeback::url Title: $writeback::title Comment/Excerpt: $writeback::comment$writeback::excerpt';my $writeback ='';if ($param{'comment'}) {if ($blosxom::path_info =~ /\./) {$param{'comment'} =~s/\t/ /g;$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'comment', 'general') || '$writeback::name $writeback::title $writeback::comment';}$cm_count++;} elsif ($param{'excerpt'}) {if ($blosxom::path_info =~ /\./) {$param{'excerpt'} =~s/\t/ /g;$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'trackback', 'general') || '$writeback::blog_name $writeback::title $writeback::excerpt';}$tb_count++;}429-437行$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;$writeback = Jcode->new(\$writeback, $charcode)->euc;$writeback =~ s/<a href=\"\">(($euc_characters)+)<\/a>/$1/g;$writeback = Jcode->new(\$writeback, 'euc')->$charcode();$writebacks .= $writeback;$count++;}}$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;$writeback = Jcode->new(\$writeback, $charcode)->euc;$writeback =~ s/<a href=\"\">(($euc_characters)+)<\/a>/$1/g;$writeback = Jcode->new(\$writeback, 'euc')->$charcode();$writebacks .= $writeback;if ($blosxom::path_info =~ /\./) {$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;if ($param{'excerpt'}) {$trackbacks .= $writeback;} else {$comments .= $writeback;}$writebacks .= $writeback;}$count++;}}...

[Trackback(0)/Comment(7)] [mixi]

edit this blog...

Title:

Body:

meta-creation_date: 11/08/2004 21:24:00

TrackbackとCommentを分ける変更をしてみた

<a href="http://sweet.littlestar.jp/" target="_blank">LittleStoryホームページ</a>さんで動いているwritbackを参照しました

まずflavour部分ですが、writeback.generalをtrackback.generalとcomment.generalに分け

comment.generalには

<code>&lt;p>$writeback::name&lt;br />$writeback::title&lt;br />$writeback::comment&lt;/p></code>

trackback.generalには

<code>&lt;p>$writeback::blog_name&lt;br />$writeback::title&lt;br />$writeback::excerpt&lt;/p></code>

story flavourか、writebacksform.generalに記述している<code>$writeback::writebacks</code>を<code>$writeback::$writeback::trackbacks</code>と<code>$writeback::comments</code>にする

残りは件数のカウント部分ですが、

<code>$writeback::count</code>でwriteback件数(両方)
<code>$writeback::tb_count</code>でtrackback件数
<code>$writeback::cm_count</code>でcomment件数

で、これをしてもrecentwritebacks_treeでは全然関係ないのでTrackbackとCommentを読み分けられないし、dateは記録形式が違うので別問題な罠

簡単に出来そうなのはwritbackplus_custom_06 85-86行の

<pre><code># What fields are used in your comments form and by trackbacks?
my @fields = qw! name url date title comment excerpt blog_name ip !;</code></pre>

をいじってデータの格納順を変え、dateの形式を変えてしまう

recentwritebacks_treeのdateをいじるとソートが面倒っぽい

むしろキャッシュファイル作った方がTrackbackとComment両方ある場合両方カウントされてしまうのを防げるのでよいと思う

以下plugin内部の変更

8-10行

package writeback;

</code></pre>

package writeback;

use vars qw($trackback_flavour $writeback_response $trackback_response);
use vars qw($count $writebacks $cm_count $tb_count $trackbacks $comments);
use vars qw($last_cm_date $last_cm_name);

</code></pre>

385-389行

<pre><code>
sub story {
	my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_;
 
	$path =~ s!^/*!!; $path &&= "/$path";
	my %param = ();
</code></pre>

<pre><code>
sub story {
	my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_;
 
	$path =~ s!^/*!!; $path &&= "/$path";
	($count, $writebacks, $cm_count, $comments, $tb_count, $trackbacks) = (0, '', 0, '', 0, '');
	($last_cm_date, $last_cm_name) =(''.'');
	my %param = ();
</code></pre>

403行

<pre><code>
				my $writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path,'writeback','general') || '&lt;p>&lt;b>Name/Blog:&lt;/b> $writeback::name$writeback::blog_name&lt;br />&lt;b>URL:&lt;/b> $writeback::url&lt;br />&lt;b>Title:&lt;/b> $writeback::title&lt;br />&lt;b>Comment/Excerpt:&lt;/b> $writeback::comment$writeback::excerpt&lt;/p>';
</code></pre>

<pre><code>
			my $writeback ='';
			if ($param{'comment'}) {
				if ($blosxom::path_info =~ /\./) {
					$param{'comment'} =~s/\t/&lt;br>/g;
					$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'comment', 'general') || '&lt;p>$writeback::name&lt;br />$writeback::title&lt;br />$writeback::comment&lt;/p>';
				}
				$cm_count++;
			} elsif ($param{'excerpt'}) {
				if ($blosxom::path_info =~ /\./) {
					$param{'excerpt'} =~s/\t/&lt;br>/g;
					$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'trackback', 'general') || '&lt;p>$writeback::blog_name&lt;br />$writeback::title&lt;br />$writeback::excerpt&lt;/p>';
				}
				$tb_count++;
			}
</code></pre>

429-437行

<pre><code>
				$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;
				
				$writeback = Jcode->new(\$writeback, $charcode)->euc;
				$writeback =~ s/&lt;a href=\"\">(($euc_characters)+)&lt;\/a>/$1/g;
				$writeback = Jcode->new(\$writeback, 'euc')->$charcode();
				$writebacks .= $writeback;
			if ($blosxom::path_info =~ /\./) {
				$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;
				if ($param{'excerpt'}) {
					$trackbacks .= $writeback;
				} else {
					$comments .= $writeback;
				}
				$writebacks .= $writeback;
			}
				$count++;
			}
		}
</code></pre>

Excerpt:

をいじってデータの格納順を変え、dateの形式を変えてしまうrecentwritebacks_treeのdateをいじるとソートが面倒っぽいむしろキャッシュファイル作った方がTrackbackとComment両方ある場合両方カウントされてしまうのを防げるのでよいと思う以下plugin内部の変更8-10行package writeback;package writeback;use vars qw($trackback_flavour $writeback_response $trackback_response);use vars qw($count $writebacks $cm_count $tb_count $trackbacks $comments);use vars qw($last_cm_date $last_cm_name);385-389行sub story {my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_; $path =~ s!^/*!!; $path &&= "/$path";my %param = ();sub story {my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_; $path =~ s!^/*!!; $path &&= "/$path";($count, $writebacks, $cm_count, $comments, $tb_count, $trackbacks) = (0, '', 0, '', 0, '');($last_cm_date, $last_cm_name) =(''.'');my %param = (); 403行my $writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path,'writeback','general') || 'Name/Blog: $writeback::name$writeback::blog_name URL: $writeback::url Title: $writeback::title Comment/Excerpt: $writeback::comment$writeback::excerpt';my $writeback ='';if ($param{'comment'}) {if ($blosxom::path_info =~ /\./) {$param{'comment'} =~s/\t/ /g;$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'comment', 'general') || '$writeback::name $writeback::title $writeback::comment';}$cm_count++;} elsif ($param{'excerpt'}) {if ($blosxom::path_info =~ /\./) {$param{'excerpt'} =~s/\t/ /g;$writeback = &$blosxom::template($path,'writeback',$blosxom::flavour) || &$blosxom::template($path, 'trackback', 'general') || '$writeback::blog_name $writeback::title $writeback::excerpt';}$tb_count++;}429-437行$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;$writeback = Jcode->new(\$writeback, $charcode)->euc;$writeback =~ s/<a href=\"\">(($euc_characters)+)<\/a>/$1/g;$writeback = Jcode->new(\$writeback, 'euc')->$charcode();$writebacks .= $writeback;$count++;}}$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;$writeback = Jcode->new(\$writeback, $charcode)->euc;$writeback =~ s/<a href=\"\">(($euc_characters)+)<\/a>/$1/g;$writeback = Jcode->new(\$writeback, 'euc')->$charcode();$writebacks .= $writeback;if ($blosxom::path_info =~ /\./) {$writeback =~ s/\$writeback::(\w+)/$param{$1}/ge;if ($param{'excerpt'}) {$trackbacks .= $writeback;} else {$comments .= $writeback;}$writebacks .= $writeback;}$count++;}}...

Ping URLs:

Password:

[POST to this blog (Bookmarklet)] [wikieditish.xcg] [returns to the top.]

Bookmarklet: BlosxomThis!
長引用
短引用
外部リンク作成
内部リンク作成

説明

日付

meta-creation_date: MM/DD/YYYY hh:mm:ss
例
一行目に記入して下さい
meta-creation_date: 06/04/2004 00:00:00
※日付入力後に空白行を一行入れてから本文を記入して下さい

改行

改行2回で (先頭、末尾がタグの場合末尾にスペース)
一行空けるには
改行
半角スペース改行
改行
として下さい

文字サイズの変更例

例
例

リンクの張り方

内部
<a href="URL">文字</a>
外部
<a href="URL" target="_blank">文字</a>
例
<A href="http://wolf.s58.xrea.com/">トップへ</A>
トップへ

Bookmarklet:
外部リンク作成
内部リンク作成

強調

文字
例
強調
強調

引用

短い引用の場合
<q>文字</q>

長い引用の場合
<blockquote cite="URL">文字</blockquote>
例
<q>引用</q>

引用
<blockquote cite="http://wolf.s58.xrea.com/eq2.xcg">引用</blockquote>

引用

Bookmarklet:
長引用
短引用

文字色の変更例

例
例
例
例

画像

<img src="/image/dir/ファイル名" border="枠の太さ" alt="画像タイトル" width="横" height="縦">文字</a>

コード等表記
<code>コマンド</code>
例
<code>/bye</code>
/bye
投稿後更新されない場合はこちらへアクセスして下さい