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

Re: Gmane потихоньку умирает...



On 2016-08-22, Dmitry Derjavin wrote:

> Жалко было бы permalink, но, думаю, и его подхватят.

Для Gnus можно сделать:

  (defun my/gnus-search-web-by-message-id ()
    "Search for article archive by Message-Id in Google."
    (interactive)
    (let ( (msgid (message-fetch-field "Message-Id")) (subj (message-fetch-field "Subject")) )
      (setq msgid (replace-regexp-in-string "[<>]" "" msgid))
      (setq subj (replace-regexp-in-string "[\"#]" " " subj))
      (browse-url (format "https://www.google.com.ua/search?q=%s"; (url-encode-url (format "%s OR \"%s\"" msgid subj))))
      (browse-url (format "http://mid.mail-archive.com/%s"; (url-encode-url msgid)))))

  (eval-after-load 'gnus-art
    (define-key gnus-article-mode-map [(control return)] #'my/gnus-search-web-by-message-id))

marc.info как то плохо ищет по:

  https://marc.info/?i=XXXXXX

Понятно что нужно дождаться пока статья проиндексируется. Еще фильтры могут
прибить статью. Ну и вычурные Message-Id не индексируются.

-- 
http://defun.work/


Reply to: