ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-footnote: Fix error on 32 bits system 

* lisp/org-footnote.el (org-footnote-new): Use a value in the 32-bit range.

Reported-by: Sam Halliday <sam.halliday@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/103184>
This commit is contained in:
Nicolas Goaziou 2015-11-30 16:08:00 +01:00
parent d85ddfba0d
commit 54c5847385
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-footnote.el
View File

@ -533,7 +533,7 @@ or new, let the user edit the definition of the footnote."
(label (label
(org-footnote-normalize-label (org-footnote-normalize-label
(if (eq org-footnote-auto-label 'random) (if (eq org-footnote-auto-label 'random)
(format "fn:%x" (random #x100000000)) (format "fn:%x" (random most-positive-fixnum))
(let ((propose (org-footnote-unique-label all))) (let ((propose (org-footnote-unique-label all)))
(if (memq org-footnote-auto-label '(t plain)) propose (if (memq org-footnote-auto-label '(t plain)) propose
(org-icompleting-read (org-icompleting-read