diff options
| -rw-r--r-- | hnreader.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/hnreader.el b/hnreader.el index b5cc194..a2b7fef 100644 --- a/hnreader.el +++ b/hnreader.el @@ -35,6 +35,7 @@ ;; hnreader-ask: Load ask page. ;; hnreader-show: Load show page. ;; hnreader-newest: Load new link page. +;; hnreader-best: Load page with best articles. ;; hnreader-more: Load more. ;; hnreader-back: Go back to previous page. ;; hnreader-comment: read an HN item url such as https://news.ycombinator.com/item?id=1 @@ -151,7 +152,8 @@ third one is 80.") (insert "[[elisp:(hnreader-past)][Past]] | ") (insert "[[elisp:(hnreader-ask)][Ask]] | ") (insert "[[elisp:(hnreader-show)][Show]] | ") - (insert "[[elisp:(hnreader-jobs)][Jobs]]")) + (insert "[[elisp:(hnreader-jobs)][Jobs]] | ") + (insert "[[elisp:(hnreader-best)][Best]]")) (defun hnreader--print-frontpage-item (thing subtext) "Print THING dom and SUBTEXT dom." @@ -394,6 +396,12 @@ Also upate `hnreader--history'." (hnreader-read-page "https://news.ycombinator.com/jobs")) ;;;###autoload +(defun hnreader-best () + "Read page with best/top items." + (interactive) + (hnreader-read-page "https://news.ycombinator.com/best")) + +;;;###autoload (defun hnreader-more() "Load more." (interactive) |