[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
address@hidden: minor bug in footnote.el]
From: |
Richard Stallman |
Subject: |
address@hidden: minor bug in footnote.el] |
Date: |
Wed, 31 Oct 2007 03:46:57 -0400 |
[I sent this message a week ago but did not get a response.]
Would someone please DTRT and ack?
------- Start of forwarded message -------
X-Spam-Status: No, score=-0.0 required=5.0 tests=SPF_HELO_PASS,SPF_PASS,
UNPARSEABLE_RELAY autolearn=failed version=3.1.0
Mail-Followup-To: address@hidden
To: address@hidden
From: Eduard Wiebe <address@hidden>
Date: Wed, 17 Oct 2007 23:19:38 +0200
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Mail-Copies-To: never
Subject: minor bug in footnote.el
- --=-=-=
Hi all,
The mini bug occurs by switching footnote marks of more than one
characters from roman-lower to roman-upper style.
For example try this:
(progn
(point-max)
(newline 2)
(footnote-mode 1)
(Footnote-set-style 'roman-lower)
(insert "eins")
(Footnote-add-footnote)
(insert "must I after cyclic style change")
(Footnote-back-to-message)
(insert " zwei")
(Footnote-add-footnote)
(insert "must II after cyclic style change")
(Footnote-back-to-message)
(Footnote-cycle-style)
(footnote-mode -1))
My simple patch follows
- --=-=-=
Content-Type: text/x-patch
Content-Disposition: inline; filename=footnote.diff
- --- footnote.el 26 Jul 2007 07:27:12 +0200 1.20
+++ footnote.el 17 Oct 2007 22:09:06 +0200
@@ -344,7 +344,7 @@
(search-backward footnote-start-tag nil t)
(when (looking-at (concat
(regexp-quote footnote-start-tag)
- - "\\(" index-regexp "\\)"
+ "\\(" index-regexp "+\\)"
(regexp-quote footnote-end-tag)))
(replace-match (concat
footnote-start-tag
@@ -360,7 +360,7 @@
(goto-char (cdr alist))
(when (looking-at (concat
(regexp-quote footnote-start-tag)
- - "\\(" index-regexp "\\)"
+ "\\(" index-regexp "+\\)"
(regexp-quote footnote-end-tag)))
(replace-match (concat
footnote-start-tag
- --=-=-=
GNU Emacs 22.1.1 (i386-pc-freebsd, GTK+ Version 2.10.14)
- --
Eduard Wiebe
- --=-=-=
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
_______________________________________________
Emacs-devel mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-devel
- --=-=-=--
------- End of forwarded message -------