forked from mirrors/org-mode
org-gnus: Add note about integer overflow guard
* lisp/org-gnus.el (org-gnus-follow-link): Add compatibility note to code that guards against integer overflow. Emacs's 7e294d55e1 (Remove some obsolete integer overflow handling, 2019-07-22) removes this, but we can't port that for compatibility reasons.
This commit is contained in:
parent
1c3eae8f37
commit
be47489c31
|
@ -243,7 +243,9 @@ If `org-store-link' was called with a prefix arg the meaning of
|
|||
(let ((articles 1)
|
||||
group-opened)
|
||||
(while (and (not group-opened)
|
||||
;; Stop on integer overflows.
|
||||
;; Stop on integer overflows. Note: We
|
||||
;; can drop this once we require at least
|
||||
;; Emacs 27, which supports bignums.
|
||||
(> articles 0))
|
||||
(setq group-opened (gnus-group-read-group articles t group))
|
||||
(setq articles (if (< articles 16)
|
||||
|
|
Loading…
Reference in a new issue