tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

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:
Kyle Meyer 2019-07-23 23:10:09 -04:00
parent 1c3eae8f37
commit be47489c31
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-gnus.el
View File

@ -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)