• R/O
  • SSH
  • HTTPS

dic-lookup-w3m: コミット


コミットメタ情報

リビジョン97 (tree)
日時2017-04-27 23:32:37
作者dlw

ログメッセージ

*** empty log message ***

変更サマリ

差分

--- dic-lookup-w3m-ja.el (revision 96)
+++ dic-lookup-w3m-ja.el (revision 97)
@@ -1,6 +1,6 @@
11 ;;; dic-lookup-w3m-ja.el --- look up dictionaries on the Internet
22
3-;; Copyright (C) 2008, 2009, 2010, 2011, 2012, 2014, 2015, 2016 mcprvmec
3+;; Copyright (C) 2008, 2009, 2010, 2011, 2012, 2014, 2015, 2016, 2017 mcprvmec
44
55 ;; Author: mcprvmec
66
@@ -69,22 +69,22 @@
6969 "http://dic.search.yahoo.co.jp/search?p=%s&dic_id=all&stype=prefix&b=1"
7070 utf-8 nil "すべての辞書")
7171
72- ;; excite
73- ("ej-excite"
74- "http://www.excite.co.jp/world/ej_dictionary/NEW_EJJE/beginswith/%s/"
75- utf-8 nil "新英和中辞典第6版(研究社)")
76- ("je-excite"
77- "http://www.excite.co.jp/world/ej_dictionary/NEW_EJJE/beginswith/%s/"
78- utf-8 nil "新和英中辞典第4版(研究社)")
79- ("jj-excite" "http://www.excite.co.jp/world/j_dictionary/beginswith/%s/"
80- utf-8 nil "大辞林第二版(三省堂)")
81- ("cj-excite" "http://www.excite.co.jp/world/cj_dictionary/beginswith/%s/"
82- utf-8 nil "デイリーコンサイス中日辞典(三省堂)")
83- ("jc-excite" "http://www.excite.co.jp/world/jc_dictionary/beginswith/%s/"
84- utf-8 nil "デイリーコンサイス日中辞典(三省堂)")
85- ("ej-computer-excite"
86- "http://www.excite.co.jp/world/ej_dictionary/COMP_EJ/beginswith/%s/"
87- utf-8 nil "英和コンピュータ用語辞典")
72+ ;; excite 2017/4/27サービス終了
73+ ;; ("ej-excite"
74+ ;; "http://www.excite.co.jp/world/ej_dictionary/NEW_EJJE/beginswith/%s/"
75+ ;; utf-8 nil "新英和中辞典第6版(研究社)")
76+ ;; ("je-excite"
77+ ;; "http://www.excite.co.jp/world/ej_dictionary/NEW_EJJE/beginswith/%s/"
78+ ;; utf-8 nil "新和英中辞典第4版(研究社)")
79+ ;; ("jj-excite" "http://www.excite.co.jp/world/j_dictionary/beginswith/%s/"
80+ ;; utf-8 nil "大辞林第二版(三省堂)")
81+ ;; ("cj-excite" "http://www.excite.co.jp/world/cj_dictionary/beginswith/%s/"
82+ ;; utf-8 nil "デイリーコンサイス中日辞典(三省堂)")
83+ ;; ("jc-excite" "http://www.excite.co.jp/world/jc_dictionary/beginswith/%s/"
84+ ;; utf-8 nil "デイリーコンサイス日中辞典(三省堂)")
85+ ;; ("ej-computer-excite"
86+ ;; "http://www.excite.co.jp/world/ej_dictionary/COMP_EJ/beginswith/%s/"
87+ ;; utf-8 nil "英和コンピュータ用語辞典")
8888
8989 ;; ALC
9090 ("ej-alc" "http://eow.alc.co.jp/search?q=%s" utf-8 nil "英辞郎")
@@ -1799,84 +1799,84 @@
17991799 ("\\`http://dic\\.search\\.yahoo\\.co\\.jp//?dsearch"
18001800 dic-lookup-w3m-filter-show-candidates "ej-yahoo")
18011801
1802- ;; excite dic
1803- ("\\`http://www\\.excite\\.co\\.jp/world/j_dictionary/"
1804- (w3m-filter-replace-regexp "<p>le=\"\">" "<p>")
1805- (w3m-filter-replace-regexp "<br [^>]*</p>" "<br /></p>")
1806- )
1807- ("\\`http://www\\.excite\\.co\\.jp/world/.*dictionary/"
1808- (dic-lookup-w3m-filter-excite-jump-to-1stcontent
1809- "http://www.excite.co.jp%s"
1810- "<a href=\"\\(/world/.*dictionary.*/ITEM-.*/\\?search=[^>]*\\)\">" 1)
1811- (w3m-filter-delete-regions
1812- "<body>" "<div class=\"dictionary_history\">" t t)
1813- (w3m-filter-delete-regions
1814- "<div class=\"content\">" "<div class=\"wordDetails\">" t t)
1815- (w3m-filter-delete-regions
1816- "<div class=\"content cnja\">" "<div class=\"wordDetails\">" t t)
1817- (w3m-filter-replace-regexp
1818- "<div class=\"wordDetails\">" "<br><div class=\"wordDetails\">")
1819- (w3m-filter-replace-regexp
1820- "\\(<div class=\"dictionary_history\">\\)" "\\1<br>")
1821- (w3m-filter-delete-regions "<body>" "<div class=\"section\">" t t)
1822- (w3m-filter-delete-regions
1823- "<div class=\"sectionAside\">" "</body>" nil t t)
1824- (w3m-filter-delete-regions "<div id=\"curationNews\"" "</body>" nil t)
1825- (w3m-filter-delete-regions "<div id=\"sidebar\">" "</body>" nil t)
1826- (w3m-filter-replace-regexp
1827- "\\(<div class=\"dictionary_history\">\\(.*\n\\)*.*\\)\\(<div class=\"content\">\\(.*\n\\)*.*\\)\\(</body>\\)"
1828- "\\3 \\1 \\5") ;最近検索した語句
1829- (w3m-filter-replace-regexp
1830- "<img src=\"?http://image\.excite\.co\.jp/jp/1pt\.gif\"?[^>]*>" "")
1831- (dic-lookup-w3m-filter-eword-anchor "ej-excite")
1832- )
1833- ("\\`http://www\\.excite\\.co\\.jp/world/\\(ej\\|je\\)_dictionary/.*/"
1834- (w3m-filter-replace-regexp
1835- "<p align=right> \\(<[^>]+>次へ</a>\\)</p>" "<p>\\1</p>")
1836- (w3m-filter-replace-regexp
1837- "<br>\\([0-9]*\\)\\(a?\\) " "<br><b>\\1</b><i>\\2</i> ")
1838- (w3m-filter-replace-regexp
1839- "<br>\\([a-z]\\) " "<br><i>\\1</i> ")
1840- (dic-lookup-w3m-filter-eword-anchor "ej-excite")
1841- (dic-lookup-w3m-filter-related-links "ej-excite" ej)
1842- (dic-lookup-w3m-filter-convert-phonetic-symbol
1843- dic-lookup-w3m-filter-excite-ej-symbol-alist
1844- "<img src=\"http://dictionary\\.eiwa\\.excite\\.co\\.jp/images/\\(NEW_EJJE\\|COMP_EJ\\)/gaiji/\\([a-z0-9]+\\)\\.gif\"[^>]*>"
1845- 2)
1846- )
1847- ("\\`http://www\\.excite\\.co\\.jp/world/j_dictionary/.*"
1848- (w3m-filter-replace-regexp
1849- "<span class=\"NetDicItemLink\" ItemID=\"\\([^\"]+\\)\">\\(\\([^<]+\\).*\</span>\\)"
1850- "<a href=\"./?search=\\3&itemid=\\1\">\\2</a>")
1851- (dic-lookup-w3m-filter-convert-phonetic-symbol
1852- dic-lookup-w3m-filter-excite-jj-symbol-alist
1853- "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=.*&amp;name=\\([A-Za-z_0-9]+\\)[^>]*>")
1854- (w3m-filter-replace-regexp
1855- "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=unicode&amp;name=\\([^&\"]+\\)[^>]*>" "&#x\\1\;")
1856- (w3m-filter-replace-regexp
1857- "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=DJR3-ugi&amp;name=\\([^&\"]+\\)[^>]*>" "&#x\\1\;")
1858- (w3m-filter-replace-regexp "</div><div style=\"margin-left:1.2em;\">" "")
1859- (dic-lookup-w3m-filter-related-links "jj-excite" jj)
1860- )
1861- ("\\`http://www\\.excite\\.co\\.jp/world/cj_dictionary/.*"
1862- (dic-lookup-w3m-filter-related-links "cj-excite" cj)
1863- (dic-lookup-w3m-filter-convert-phonetic-symbol
1864- dic-lookup-w3m-filter-excite-cj-symbol-alist
1865- "<img src=\"?http://image\\.excite\\.co\\.jp/jp/dictionary/\\(pinyin\\|chinese_japanese\\)/\\([a-z_0-9]+\\)\\.gif\"?[^>]*>"
1866- 2)
1867- )
1868- ("\\`http://www\\.excite\\.co\\.jp/world/jc_dictionary/.*"
1869- (dic-lookup-w3m-filter-related-links "jc-excite" cj)
1870- (w3m-filter-replace-regexp
1871- "\\(<img src=\"http://image\\.excite\\.co\\.jp/jp/dictionary/japanese_chinese/\\(yakugo\\|youyaku\\)\.gif\"[^>]*/>\\)\\([^<]+\\)\\(&nbsp;\\)"
1872- "\\1<a href=\"/dictionary/chinese_japanese/?search=\\3\">\\3</a>\\4")
1873- (dic-lookup-w3m-filter-convert-phonetic-symbol
1874- dic-lookup-w3m-filter-excite-cj-symbol-alist
1875- "<img src=\"?http://image\\.excite\\.co\\.jp/jp/dictionary/\\(pinyin\\|japanese_chinese\\)/\\([a-z_0-9]+\\)\\.gif\"?[^>]*>"
1876- 2)
1877- )
1878- ("\\`http://www\\.excite\\.co\\.jp/world/.*dictionary/NEW_EJJE/.*"
1879- dic-lookup-w3m-filter-show-candidates "ej-excite")
1802+ ;; excite dic 2017/4/27サービス終了
1803+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/j_dictionary/"
1804+ ;; (w3m-filter-replace-regexp "<p>le=\"\">" "<p>")
1805+ ;; (w3m-filter-replace-regexp "<br [^>]*</p>" "<br /></p>")
1806+ ;; )
1807+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/.*dictionary/"
1808+ ;; (dic-lookup-w3m-filter-excite-jump-to-1stcontent
1809+ ;; "http://www.excite.co.jp%s"
1810+ ;; "<a href=\"\\(/world/.*dictionary.*/ITEM-.*/\\?search=[^>]*\\)\">" 1)
1811+ ;; (w3m-filter-delete-regions
1812+ ;; "<body>" "<div class=\"dictionary_history\">" t t)
1813+ ;; (w3m-filter-delete-regions
1814+ ;; "<div class=\"content\">" "<div class=\"wordDetails\">" t t)
1815+ ;; (w3m-filter-delete-regions
1816+ ;; "<div class=\"content cnja\">" "<div class=\"wordDetails\">" t t)
1817+ ;; (w3m-filter-replace-regexp
1818+ ;; "<div class=\"wordDetails\">" "<br><div class=\"wordDetails\">")
1819+ ;; (w3m-filter-replace-regexp
1820+ ;; "\\(<div class=\"dictionary_history\">\\)" "\\1<br>")
1821+ ;; (w3m-filter-delete-regions "<body>" "<div class=\"section\">" t t)
1822+ ;; (w3m-filter-delete-regions
1823+ ;; "<div class=\"sectionAside\">" "</body>" nil t t)
1824+ ;; (w3m-filter-delete-regions "<div id=\"curationNews\"" "</body>" nil t)
1825+ ;; (w3m-filter-delete-regions "<div id=\"sidebar\">" "</body>" nil t)
1826+ ;; (w3m-filter-replace-regexp
1827+ ;; "\\(<div class=\"dictionary_history\">\\(.*\n\\)*.*\\)\\(<div class=\"content\">\\(.*\n\\)*.*\\)\\(</body>\\)"
1828+ ;; "\\3 \\1 \\5") ;最近検索した語句
1829+ ;; (w3m-filter-replace-regexp
1830+ ;; "<img src=\"?http://image\.excite\.co\.jp/jp/1pt\.gif\"?[^>]*>" "")
1831+ ;; (dic-lookup-w3m-filter-eword-anchor "ej-excite")
1832+ ;; )
1833+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/\\(ej\\|je\\)_dictionary/.*/"
1834+ ;; (w3m-filter-replace-regexp
1835+ ;; "<p align=right> \\(<[^>]+>次へ</a>\\)</p>" "<p>\\1</p>")
1836+ ;; (w3m-filter-replace-regexp
1837+ ;; "<br>\\([0-9]*\\)\\(a?\\) " "<br><b>\\1</b><i>\\2</i> ")
1838+ ;; (w3m-filter-replace-regexp
1839+ ;; "<br>\\([a-z]\\) " "<br><i>\\1</i> ")
1840+ ;; (dic-lookup-w3m-filter-eword-anchor "ej-excite")
1841+ ;; (dic-lookup-w3m-filter-related-links "ej-excite" ej)
1842+ ;; (dic-lookup-w3m-filter-convert-phonetic-symbol
1843+ ;; dic-lookup-w3m-filter-excite-ej-symbol-alist
1844+ ;; "<img src=\"http://dictionary\\.eiwa\\.excite\\.co\\.jp/images/\\(NEW_EJJE\\|COMP_EJ\\)/gaiji/\\([a-z0-9]+\\)\\.gif\"[^>]*>"
1845+ ;; 2)
1846+ ;; )
1847+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/j_dictionary/.*"
1848+ ;; (w3m-filter-replace-regexp
1849+ ;; "<span class=\"NetDicItemLink\" ItemID=\"\\([^\"]+\\)\">\\(\\([^<]+\\).*\</span>\\)"
1850+ ;; "<a href=\"./?search=\\3&itemid=\\1\">\\2</a>")
1851+ ;; (dic-lookup-w3m-filter-convert-phonetic-symbol
1852+ ;; dic-lookup-w3m-filter-excite-jj-symbol-alist
1853+ ;; "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=.*&amp;name=\\([A-Za-z_0-9]+\\)[^>]*>")
1854+ ;; (w3m-filter-replace-regexp
1855+ ;; "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=unicode&amp;name=\\([^&\"]+\\)[^>]*>" "&#x\\1\;")
1856+ ;; (w3m-filter-replace-regexp
1857+ ;; "<img src=\"http://b2b\\.dejizo\\.jp/Resource\\.aspx\\?set=DJR3-ugi&amp;name=\\([^&\"]+\\)[^>]*>" "&#x\\1\;")
1858+ ;; (w3m-filter-replace-regexp "</div><div style=\"margin-left:1.2em;\">" "")
1859+ ;; (dic-lookup-w3m-filter-related-links "jj-excite" jj)
1860+ ;; )
1861+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/cj_dictionary/.*"
1862+ ;; (dic-lookup-w3m-filter-related-links "cj-excite" cj)
1863+ ;; (dic-lookup-w3m-filter-convert-phonetic-symbol
1864+ ;; dic-lookup-w3m-filter-excite-cj-symbol-alist
1865+ ;; "<img src=\"?http://image\\.excite\\.co\\.jp/jp/dictionary/\\(pinyin\\|chinese_japanese\\)/\\([a-z_0-9]+\\)\\.gif\"?[^>]*>"
1866+ ;; 2)
1867+ ;; )
1868+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/jc_dictionary/.*"
1869+ ;; (dic-lookup-w3m-filter-related-links "jc-excite" cj)
1870+ ;; (w3m-filter-replace-regexp
1871+ ;; "\\(<img src=\"http://image\\.excite\\.co\\.jp/jp/dictionary/japanese_chinese/\\(yakugo\\|youyaku\\)\.gif\"[^>]*/>\\)\\([^<]+\\)\\(&nbsp;\\)"
1872+ ;; "\\1<a href=\"/dictionary/chinese_japanese/?search=\\3\">\\3</a>\\4")
1873+ ;; (dic-lookup-w3m-filter-convert-phonetic-symbol
1874+ ;; dic-lookup-w3m-filter-excite-cj-symbol-alist
1875+ ;; "<img src=\"?http://image\\.excite\\.co\\.jp/jp/dictionary/\\(pinyin\\|japanese_chinese\\)/\\([a-z_0-9]+\\)\\.gif\"?[^>]*>"
1876+ ;; 2)
1877+ ;; )
1878+ ;; ("\\`http://www\\.excite\\.co\\.jp/world/.*dictionary/NEW_EJJE/.*"
1879+ ;; dic-lookup-w3m-filter-show-candidates "ej-excite")
18801880
18811881 ;; alc
18821882 ("\\`http://eow\\.alc\\.co\\.jp/search"
旧リポジトリブラウザで表示