OSDN Git Service

・お気に入りの名前を変更したときに変更が適用されるように修正。
authoryoffy <yoffy>
Mon, 24 Nov 2003 12:02:15 +0000 (12:02 +0000)
committeryoffy <yoffy>
Mon, 24 Nov 2003 12:02:15 +0000 (12:02 +0000)
Favorite.pas

index afdd309..cdd6670 100644 (file)
@@ -432,12 +432,12 @@ begin
                end else if TObject(Node.Item[i].Data) is TFavoriteBoardItem then begin
                        FavBoard := TFavoriteBoardItem(Node.Item[i].Data);
                        s := Format('<favitem type="2ch" favtype="board" url="%s" title="%s"/>',
-                                                                       [HtmlEncode( FavBoard.URL ), HtmlEncode(FavBoard.Title)]);
+                                                                       [HtmlEncode( FavBoard.URL ), HtmlEncode(Node.Item[ i ].Text)]);
                        SaveList.Add(s);
                end else if TObject(Node.Item[i].Data) is TFavoriteThreadItem then begin
                        FavThread := TFavoriteThreadItem(Node.Item[i].Data);
                        s := Format('<favitem type="2ch" favtype="thread" url="%s" title="%s"/>',
-                                                                       [HtmlEncode( FavThread.URL ), HtmlEncode(FavThread.Title)]);
+                                                                       [HtmlEncode( FavThread.URL ), HtmlEncode(Node.Item[ i ].Text)]);
                        SaveList.Add(s);
                end;
        end;