[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mail/footnote.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mail/footnote.el |
Date: |
Fri, 04 Apr 2003 01:22:30 -0500 |
Index: emacs/lisp/mail/footnote.el
diff -c emacs/lisp/mail/footnote.el:1.5 emacs/lisp/mail/footnote.el:1.6
*** emacs/lisp/mail/footnote.el:1.5 Thu Dec 20 13:21:57 2001
--- emacs/lisp/mail/footnote.el Tue Feb 4 08:14:00 2003
***************
*** 161,167 ****
(setq rc (concat rc chr))
(setq rep (1- rep)))
rc))
!
;;; ENGLISH LOWER
(defconst footnote-english-lower "abcdefghijklmnopqrstuvwxyz"
"Lower case English alphabet.")
--- 161,167 ----
(setq rc (concat rc chr))
(setq rep (1- rep)))
rc))
!
;;; ENGLISH LOWER
(defconst footnote-english-lower "abcdefghijklmnopqrstuvwxyz"
"Lower case English alphabet.")
***************
*** 482,488 ****
(Footnote-goto-char-point-max)
(if (re-search-backward (concat "^" footnote-section-tag-regexp) nil t)
(save-restriction
! (when footnote-narrow-to-footnotes-when-editing
(Footnote-narrow-to-footnotes))
(Footnote-goto-footnote (1- arg)) ; evil, FIXME (less evil now)
;; (message "Inserting footnote %d" arg)
--- 482,488 ----
(Footnote-goto-char-point-max)
(if (re-search-backward (concat "^" footnote-section-tag-regexp) nil t)
(save-restriction
! (when footnote-narrow-to-footnotes-when-editing
(Footnote-narrow-to-footnotes))
(Footnote-goto-footnote (1- arg)) ; evil, FIXME (less evil now)
;; (message "Inserting footnote %d" arg)
***************
*** 554,562 ****
(unless rc
(setq rc (car alist-ptr)))
(save-excursion
! (message "Renumbering from %s to %s"
(Footnote-index-to-string (car alist-ptr))
! (Footnote-index-to-string
(1+ (car alist-ptr))))
(Footnote-renumber (car alist-ptr)
(1+ (car alist-ptr))
--- 554,562 ----
(unless rc
(setq rc (car alist-ptr)))
(save-excursion
! (message "Renumbering from %s to %s"
(Footnote-index-to-string (car alist-ptr))
! (Footnote-index-to-string
(1+ (car alist-ptr))))
(Footnote-renumber (car alist-ptr)
(1+ (car alist-ptr))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/mail/footnote.el,
Miles Bader <=