diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-30 16:08:00 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-30 16:08:00 +0100 |
commit | 54c584738564661a916e3c1a223c8ddab7e29f48 (patch) | |
tree | a25c4188a16ca4faa46062d4574d620925251109 | |
parent | d85ddfba0d07ceb303d915cd3240f26921204b57 (diff) | |
download | org-mode-54c584738564661a916e3c1a223c8ddab7e29f48.tar.gz |
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>
-rw-r--r-- | lisp/org-footnote.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index 10e95ee..7fd55d9 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -533,7 +533,7 @@ or new, let the user edit the definition of the footnote." (label (org-footnote-normalize-label (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))) (if (memq org-footnote-auto-label '(t plain)) propose (org-icompleting-read |