From info ＠ otsune.com  Sun Apr 24 09:17:06 2005
From: info ＠ otsune.com (Masafumi Otsune)
Date: Sun, 24 Apr 2005 09:17:06 +0900
Subject: [hns-dev:38] =?iso-2022-jp?b?b25lIHNlY3Rpb24bJEIkWCROJSIlLyU7GyhC?=
 =?iso-2022-jp?b?GyRCJTkkTiRIJC0kSxsoQjxUSVRMRT4bJEIkSxsoQk5FVxskQiRyGyhC?=
 =?iso-2022-jp?b?GyRCST08KCQ5JGsbKEI=?=
Message-ID: <426AE582.3090607@otsune.com>

otsuneです。

題名のようなpatchを作成してみました。

--- index.cgi.in.orig   Sun Apr 24 08:57:09 2005
+++ index.cgi.in        Sun Apr 24 09:04:19 2005
@@ -182,6 +182,14 @@
     if ($y < 1970){
         $col->ReadRecent($HNS::System::DefaultMax);
     } else {
+      use HNS::Tools::HeadLine;
+      my $sectitle = new HNS::Tools::HeadLine;
+     $sectitle->getFileListByPattern($sectitle->diaryDir($y),"$y$m$d");
+      $sectitle->readHnf("d$y$m$d.hnf", 'side');
+      my @new = @{$sectitle->title};
+      my $stitle = @new[$s];
+      $stitle =~ s/^.*>(.*)<\/a>$/$1/g;
+      $HNS::System::Title .= ' ' . $stitle;
         $col->Read($y, $m, $d);
     }
 }


From info ＠ otsune.com  Sun Apr 24 09:19:06 2005
From: info ＠ otsune.com (Masafumi Otsune)
Date: Sun, 24 Apr 2005 09:19:06 +0900
Subject: [hns-dev:39] =?iso-2022-jp?b?bGliL0hOUy9Ub29scy9SU1MucG0=?=
 =?iso-2022-jp?b?GyRCJE4lKCVpITwkcj0kQDUbKEI=?=
Message-ID: <426AE5FA.9090900@otsune.com>

otsuneです。

rss.cgiの出力がbloglinesやFeedValidatorでWarningが出て誤動作していたので
対処してみました。
※ついでに<dc:creator>を追加してみました。

--- RSS.pm.orig Wed Apr 20 02:26:31 2005
+++ RSS.pm      Wed Apr 20 02:31:46 2005
@@ -47,6 +47,7 @@
        print "<title>$HNS::System::Title</title>\n";
        print "<link>$HNS::System::MyDiaryURI</link>\n";
        print "<description>$HNS::System::Title Recent</description>\n";
+       print "<dc:creator>$HNS::System::Author</dc:creator>\n";
        print "<items>\n";
        print " <rdf:Seq>\n";
        print $items;
@@ -202,6 +203,7 @@

                my $para;
                foreach (@{$section->{text}}, map(@{$_},
@{$section->{sub}})) {
+                   s/&/&amp;/g;
                    s/"/&quot;/g;
                    s/~$//;
                    s/\t/ /;    # cache/rss.txt tab separator


From kenji ＠ club.h14m.org  Mon Apr 25 21:25:23 2005
From: kenji ＠ club.h14m.org (Kenji)
Date: Mon, 25 Apr 2005 21:25:23 +0900
Subject: [hns-dev:40] =?iso-2022-jp?b?UmU6IG9uZSBzZWN0aW9uGyRCJFgkTiUiGyhC?=
 =?iso-2022-jp?b?GyRCJS8lOyU5JE4kSCQtJEsbKEI8VElUTEU+GyRCJEsbKEJORVc=?=
 =?iso-2022-jp?b?GyRCJHJJPTwoJDkkaxsoQg==?=
In-Reply-To: <426AE582.3090607@otsune.com>
References: <426AE582.3090607@otsune.com>
Message-ID: <20050425212523.1ccd038e.kenji@club.h14m.org>

Kenji です。


On Sun, 24 Apr 2005 09:17:06 +0900
Masafumi Otsune <info ＠ otsune.com> wrote:

> otsuneです。
> 
> 題名のようなpatchを作成してみました。

patch ありがとうございます。
hns-current に merge させて頂きました。


// Kenji


From kenji ＠ club.h14m.org  Mon Apr 25 21:25:57 2005
From: kenji ＠ club.h14m.org (Kenji)
Date: Mon, 25 Apr 2005 21:25:57 +0900
Subject: [hns-dev:41] =?iso-2022-jp?b?UmU6IGxpYi9ITlMvVG9vbHMvUlNTLnBt?=
 =?iso-2022-jp?b?GyRCJE4lKCVpITwkcj0kQDUbKEI=?=
In-Reply-To: <426AE5FA.9090900@otsune.com>
References: <426AE5FA.9090900@otsune.com>
Message-ID: <20050425212557.18f7d46f.kenji@club.h14m.org>

Kenji です。

On Sun, 24 Apr 2005 09:19:06 +0900
Masafumi Otsune <info ＠ otsune.com> wrote:

> otsuneです。
> 
> rss.cgiの出力がbloglinesやFeedValidatorでWarningが出て誤動作していたので
> 対処してみました。
> ※ついでに<dc:creator>を追加してみました。

fix ありがとうございます。
hns-current に merge させて頂きました。


// Kenji


From info ＠ otsune.com  Mon Apr 25 21:49:59 2005
From: info ＠ otsune.com (Masafumi Otsune)
Date: Mon, 25 Apr 2005 21:49:59 +0900
Subject: [hns-dev:42] =?iso-2022-jp?b?UmU6IG9uZSBzZWN0aW9uGyRCJFgkTiUiGyhC?=
 =?iso-2022-jp?b?GyRCJS8lOyU5JE4kSCQtJEsbKEI8VElUTEU+GyRCJEsbKEJORVc=?=
 =?iso-2022-jp?b?GyRCJHJJPTwoJDkkaxsoQg==?=
In-Reply-To: <20050425212523.1ccd038e.kenji@club.h14m.org>
References: <426AE582.3090607@otsune.com>
	<20050425212523.1ccd038e.kenji@club.h14m.org>
Message-ID: <426CE777.1080007@otsune.com>

otsuneです。

すいません。いくつかの不具合が判明しました。

1.GRPを使用している日にTITLEがずれる
2.セクションごとの表示でも「以上、1日分です」と表示される

1.は私はlib/HNS/Tools/HeadLine.pmを
--- HeadLine.pm.bak     Mon Apr 25 21:47:22 2005
+++ HeadLine.pm Mon Apr 25 21:47:22 2005
@@ -143,7 +143,7 @@
        }
        $params->{para} = $para;

-       push(@title, $grp . $newHtml->AsHTML($templ, $params));
+       push(@title, $grp . $newHtml->AsHTML($templ, $params)) if $grp
eq '';
     }
     $self->title(\@title);
 }
としてGRP項目をヘッドラインに出力しないように殺してしまいました。
これは正しい対処では無いと思いますので、何か良い方法があればいいのですが。

2.に関しては「?19990624S10 ; one section」のクエリーで表示した場合の見た
目の問題だけですので大した不具合ではないと思います。
ただlib/HNS/Collection.pmの$HNS::Collection::FootMessagesをスイッチする
タイミングをよく把握していないので、素直な対処方法が分かりません。

Kenji wrote:
> Kenji です。
> 
> 
> On Sun, 24 Apr 2005 09:17:06 +0900
> Masafumi Otsune <info ＠ otsune.com> wrote:
> 
> 
>>otsuneです。
>>
>>題名のようなpatchを作成してみました。
> 
> 
> patch ありがとうございます。
> hns-current に merge させて頂きました。
> 
> 
> // Kenji
> _______________________________________________
> H14m-hns-dev mailing list
> H14m-hns-dev ＠ lists.sourceforge.jp
> http://lists.sourceforge.jp/mailman/listinfo/h14m-hns-dev
> 



From kenji ＠ club.h14m.org  Mon Apr 25 22:56:56 2005
From: kenji ＠ club.h14m.org (Kenji)
Date: Mon, 25 Apr 2005 22:56:56 +0900
Subject: [hns-dev:43] =?iso-2022-jp?b?UmU6IG9uZSBzZWN0aW9uGyRCJFgkTiUiGyhC?=
 =?iso-2022-jp?b?GyRCJS8lOyU5JE4kSCQtJEsbKEI8VElUTEU+GyRCJEsbKEJORVc=?=
 =?iso-2022-jp?b?GyRCJHJJPTwoJDkkaxsoQg==?=
In-Reply-To: <426CE777.1080007@otsune.com>
References: <426AE582.3090607@otsune.com>
	<20050425212523.1ccd038e.kenji@club.h14m.org>
	<426CE777.1080007@otsune.com>
Message-ID: <20050425225656.380b8f3a.kenji@club.h14m.org>

Kenji です。

On Mon, 25 Apr 2005 21:49:59 +0900
Masafumi Otsune <info ＠ otsune.com> wrote:

> otsuneです。
> 
> すいません。いくつかの不具合が判明しました。
> 
> 1.GRPを使用している日にTITLEがずれる

あ、ほんとですね。

> 2.セクションごとの表示でも「以上、1日分です」と表示される

これは、仕様っぽい感じはしますが、違和感ありますでしょうか?

 
> 1.は私はlib/HNS/Tools/HeadLine.pmを
> --- HeadLine.pm.bak     Mon Apr 25 21:47:22 2005
> +++ HeadLine.pm Mon Apr 25 21:47:22 2005
> @@ -143,7 +143,7 @@
>         }
>         $params->{para} = $para;
> 
> -       push(@title, $grp . $newHtml->AsHTML($templ, $params));
> +       push(@title, $grp . $newHtml->AsHTML($templ, $params)) if $grp
> eq '';
>      }
>      $self->title(\@title);
>  }
> としてGRP項目をヘッドラインに出力しないように殺してしまいました。
> これは正しい対処では無いと思いますので、何か良い方法があればいいのですが。

こんな感じだとどうでしょう?

===================================================================
RCS file: /cvsroot/h14m/hns-perl/public_html/diary/index.cgi.in,v
retrieving revision 1.40
diff -u -r1.40 index.cgi.in
--- index.cgi.in        25 Apr 2005 12:23:47 -0000      1.40
+++ index.cgi.in        25 Apr 2005 13:54:03 -0000
@@ -187,7 +187,12 @@
         $sectitle->getFileListByPattern($sectitle->diaryDir($y),"$y$m$d");
         $sectitle->readHnf("d$y$m$d.hnf", 'side');
         my @new = @{$sectitle->title};
-        my $stitle = @new[$s];
+        my $count = $s;
+        my $stitle = @new[$count];
+        while ($stitle =~ /<!-- GRP:.* -->/) {
+            $count++;
+            $stitle = @new[$count];
+        }
         $stitle =~ s/^.*>(.*)<\/a>$/$1/g;
         $HNS::System::Title .= ' ' . $stitle;
         $col->Read($y, $m, $d);


> 2.に関しては「?19990624S10 ; one section」のクエリーで表示した場合の見た
> 目の問題だけですので大した不具合ではないと思います。
> ただlib/HNS/Collection.pmの$HNS::Collection::FootMessagesをスイッチする
> タイミングをよく把握していないので、素直な対処方法が分かりません。


// Kenji