summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-01-06 21:48:36 +0000
committerRichard M. Stallman <rms@gnu.org>1995-01-06 21:48:36 +0000
commitab9853abf269b99754c476a5f3c47817b9239575 (patch)
treeb6127f4547c0aa5612f293b78517f9a1e5956c66
parent45ef1ff3352be3e35c88b2e43a4d7f24c0a8affd (diff)
downloademacs-ab9853abf269b99754c476a5f3c47817b9239575.tar.gz
(bibtex-clean-entry): Killing text while editing
the autogenerated label in the minibuffer caused the killed text to appear in front of the bibtex entry.
-rw-r--r--lisp/textmodes/bibtex.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index 7f5571f0fc2..75881ef2681 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -7,7 +7,6 @@
;; Mark Shapiro <shapiro@corto.inria.fr>
;; Mike Newton <newton@gumby.cs.caltech.edu>
;; Aaron Larson <alarson@src.honeywell.com>
-;; Version: 2.0 (based on RCS $Revision: 1.22 $, $Date: 1994/12/21 15:02:30 $)
;; Maintainer: Stefan Schoef <schoef@informatik.uni-oldenburg.de>
;; Keywords: BibTeX, LaTeX, TeX
@@ -1985,7 +1984,8 @@ given, calculate a new entry label."
(bibtex-end-of-entry)
(search-forward-regexp "^@" nil 'move)
(beginning-of-line)
- (point))))
+ (point)))
+ last-command)
(kill-region start end)
(let ((success (bibtex-find-entry-location autokey t)))
(yank)