diff options
| author | thanhvg <thanhvg@gmail.com> | 2022-01-03 12:09:39 -0700 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-01-03 12:09:39 -0700 |
| commit | e17006072b0cd06ab7ff32c6187e9565131a78b2 (patch) | |
| tree | 82547ade4129cc770b5fc770d7973f747ce017e0 | |
| parent | 5eb55aff411406882b8928ff233ac3d761641c6f (diff) | |
| parent | ba9b17164cf1e796879563f47bfe3613a1775dd0 (diff) | |
Merge pull request #3 from sillyfellow/master
add new command/link to show/load the top/best items
| -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) |