(minibuffer-complete-and-exit): Fix last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b5050cd67a7056a94963bd41f1e3bf1486bcc0a5..2d3cd250286de63ce71e3dfd99835d984f606145 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,11 @@
+2008-04-22  Juanma Barranquero  <lekktu@gmail.com>
+
+       * minibuffer.el (minibuffer-complete-and-exit): Fix last change.
+
 2008-04-22  Andreas Schwab  <schwab@suse.de>
 
-       * Makefile.in (emacs-deps): Define.  Use it instead of
-       $(lisp)/subdirs.el.
+       * Makefile.in (emacs-deps): Define.
+       Use it instead of $(lisp)/subdirs.el.
 
 2008-04-22  Dan Nicolaescu  <dann@ics.uci.edu>
 

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index e170e3c8a14adcb67ec4a26cd6f124eb9c64a799..a6f408c66582b254c36cb1df417708b3451bf387 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -403,7 +403,7 @@ a repetition of this command will exit."
                        minibuffer-completion-predicate)
       (when completion-ignore-case
         ;; Fixup case of the field, if necessary.
-        (let* ((string (substring beg end))
+        (let* ((string (buffer-substring beg end))
                (compl (try-completion
                        string
                        minibuffer-completion-table