diff options
-rw-r--r-- | emacs/.emacs.d/init/ycp-web.el | 3 | ||||
-rw-r--r-- | emacs/.emacs.d/lisp/my/my-hnreader.el | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el index 19c4095..b322aa0 100644 --- a/emacs/.emacs.d/init/ycp-web.el +++ b/emacs/.emacs.d/init/ycp-web.el @@ -66,7 +66,8 @@ (require 'my-hnreader) (my-override hnreader--print-frontpage) (my-override hnreader--print-frontpage-item) - (my-override hnreader--print-comments)) + (my-override hnreader--print-comments) + (my-override hnreader--get-title)) (my-package buildbot (:delay 30) diff --git a/emacs/.emacs.d/lisp/my/my-hnreader.el b/emacs/.emacs.d/lisp/my/my-hnreader.el index 325ab9d..761fad6 100644 --- a/emacs/.emacs.d/lisp/my/my-hnreader.el +++ b/emacs/.emacs.d/lisp/my/my-hnreader.el @@ -68,7 +68,7 @@ (goto-char (point-min)) (forward-line 2)))) -;; To override `'hnreader--get-title' +;; To override `hnreader--get-title' (defun my-hnreader--get-title (dom) "Get title and link from DOM comment page." (let ((a-link (dom-by-tag (dom-by-class dom "^titleline$") 'a))) |