[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: Blog Search



From: Katsumi Yamaoka <yamaoka@jpl.org>
Subject: [emacs-w3m:08382] Re: Blog Search
Date: Thu, 15 Sep 2005 08:51:49 +0900

安宅です。

> > Google から、Blog 用の検索エンジン Blog Search がリリースされました。
> 
> > http://search.blogger.com/
> 
> > 毎度のことながら、Emacs-w3m 用のパッチを書きました [1][2]。
> 
> どうもありがとうございます。さっそく幹に取り込みました。
> 
山岡さん、ありがとうございます。

Google のブログ検索には Blogger 風インターフェースと
Google 風インターフェースの二種類が出ています。
前回のコードは Blogger 風インターフェースを使ったのですが
そちらでは、BackSpace で「前」の検索結果に戻れなかったので
改めて、Google 風インターフェースで検索するようにしました。
# 詳しくはブログ (http://at-aka.blogspot.com/2005/09/emacs-w3m-blog-search-google.html)
# に書きました。

ChangeLog とパッチをお送りします。
ではでは。
                                    ----Input with T-Code!
                         http://pop-club.hp.infoseek.co.jp
     Masayuki Ataka / 安宅 正之 (ataka@milk.freemail.ne.jp)

2005-09-18  Masayuki Ataka  <ataka@milk.freemail.ne.jp>

	* w3m.el (w3m-relationship-estimate-rules): Add a rule for Google
	Blog Search.

	* w3m-search.el (w3m-search-engine-alist): Use
	`http://blogsearch.google.com/' instead of
	`http://search.blogger.com/' for "blog-*" search, because
	search.blogger.com does not have a explicit link to previous
	search result page.


Index: w3m-search.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/w3m-search.el,v
retrieving revision 1.46
diff -u -r1.46 w3m-search.el
--- w3m-search.el	14 Sep 2005 23:51:51 -0000	1.46
+++ w3m-search.el	17 Sep 2005 18:18:20 -0000
@@ -58,16 +58,16 @@
        utf-8)
       ,@(if ja
 	    '(("blog"
-	       "http://search.blogger.com/?q=%s&lr=lang_ja&oe=utf-8&ie=utf-8"
+	       "http://blogsearch.google.com/blogsearch?q=%s&lr=lang_ja&oe=utf-8&ie=utf-8"
 	       utf-8)
 	      ("blog-en"
-	       "http://search.blogger.com/?q=%s&oe=utf-8&ie=utf-8"
+	       "http://blogsearch.google.com/blogsearch?q=%s&oe=utf-8&ie=utf-8"
 	       utf-8))
 	  '(("blog"
-	     "http://search.blogger.com/?q=%s&oe=utf-8&ie=utf-8"
+	     "http://blogsearch.google.com/blogsearch?q=%s&oe=utf-8&ie=utf-8"
 	     utf-8)
 	    ("blog-ja"
-	     "http://search.blogger.com/?q=%s&lr=lang_ja&oe=utf-8&ie=utf-8"
+	     "http://blogsearch.google.com/blogsearch?q=%s&lr=lang_ja&oe=utf-8&ie=utf-8"
 	     utf-8)))
       ,@(if ja
 	    '(("google"
Index: w3m.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/w3m.el,v
retrieving revision 1.1159
diff -u -r1.1159 w3m.el
--- w3m.el	29 Aug 2005 02:19:23 -0000	1.1159
+++ w3m.el	17 Sep 2005 18:18:20 -0000
@@ -1744,7 +1744,7 @@
 
 (defcustom w3m-relationship-estimate-rules
   `((w3m-relationship-simple-estimate
-     "\\`http://\\(?:www\\|groups\\|news\\)\\.google\\.[^/]+/\\(?:search\\|groups\\|news\\)"
+     "\\`http://\\(?:www\\|blogsearch\\|groups\\|news\\)\\.google\\.[^/]+/\\(?:search\\|blogsearch\\|groups\\|news\\)"
      ,(concat "<a href=" w3m-html-string-regexp
 	      "><img src=\\(?:/intl/[^/]+/\\)?nav_next\\.gif")
      ,(concat "<a href=" w3m-html-string-regexp