emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/mail/footnote.el


From: Pavel Janík
Subject: [Emacs-diffs] Changes to emacs/lisp/mail/footnote.el
Date: Thu, 20 Dec 2001 13:21:57 -0500

Index: emacs/lisp/mail/footnote.el
diff -c emacs/lisp/mail/footnote.el:1.4 emacs/lisp/mail/footnote.el:1.5
*** emacs/lisp/mail/footnote.el:1.4     Mon Jul 16 08:22:59 2001
--- emacs/lisp/mail/footnote.el Thu Dec 20 13:21:57 2001
***************
*** 513,519 ****
  
  (defun Footnote-text-under-cursor ()
    "Return the number of footnote if in footnote text.
! Nil is returned if the cursor is not positioned over the text of
  a footnote."
    (when (and (let ((old-point (point)))
               (save-excursion
--- 513,519 ----
  
  (defun Footnote-text-under-cursor ()
    "Return the number of footnote if in footnote text.
! Return nil if the cursor is not positioned over the text of
  a footnote."
    (when (and (let ((old-point (point)))
               (save-excursion
***************
*** 536,542 ****
  
  (defun Footnote-under-cursor ()
    "Return the number of the footnote underneath the cursor.
! Nil is returned if the cursor is not over a footnote."
    (or (get-text-property (point) 'footnote-number)
        (Footnote-text-under-cursor)))
  
--- 536,542 ----
  
  (defun Footnote-under-cursor ()
    "Return the number of the footnote underneath the cursor.
! Return nil if the cursor is not over a footnote."
    (or (get-text-property (point) 'footnote-number)
        (Footnote-text-under-cursor)))
  



reply via email to

[Prev in Thread] Current Thread [Next in Thread]