Skip to content

Commit 487b21d

Browse files
committed
Add option to fill window with stories
If hackernews-items-per-page is nil, the number of stories is enough to fill the current window.
1 parent 309c60c commit 487b21d

File tree

1 file changed

+6
-4
lines changed

1 file changed

+6
-4
lines changed

hackernews.el

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -75,7 +75,8 @@
7575
'hackernews-items-per-page "0.4.0")
7676

7777
(defcustom hackernews-items-per-page 20
78-
"Default number of stories to retrieve in one go."
78+
"Default number of stories to retrieve in one go.
79+
If nil, the stories will fill the window."
7980
:package-version '(hackernews . "0.4.0")
8081
:group 'hackernews
8182
:type 'integer)
@@ -505,9 +506,10 @@ rendered at the end of the hackernews buffer."
505506
(hackernews--put :register (cons offset ids))
506507
(hackernews--put :items (make-vector
507508
(max 0 (min (- (length ids) offset)
508-
(if n
509-
(prefix-numeric-value n)
510-
hackernews-items-per-page)))
509+
(cond
510+
(n (prefix-numeric-value n))
511+
(hackernews-items-per-page)
512+
(t (1- (window-text-height))))))
511513
()))
512514

513515
(hackernews--retrieve-items)

0 commit comments

Comments
 (0)