(completion-setup-function): Fix last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ebcb76d472f5d15fca15475febebde7ce6e39841..4f748d561cc4b4af59437bf30e8f11857bf5aeeb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-11-17  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * simple.el (completion-setup-function): Fix last change.
+
 2005-11-17  John Paul Wallington  <jpw@pobox.com>
 
        * ibuf-ext.el (ibuffer-interactive-filter-by-mode):
@@ -82,8 +86,8 @@
 2005-11-16  Luc Teirlinck  <teirllm@auburn.edu>
 
        * rfn-eshadow.el (file-name-shadow-properties)
-       (file-name-shadow-tty-properties, file-name-shadow-mode): Remove
-       autoloads, because the file is now preloaded.
+       (file-name-shadow-tty-properties, file-name-shadow-mode):
+       Remove autoloads, because the file is now preloaded.
 
 2005-11-16  Stefan Monnier  <monnier@iro.umontreal.ca>
 

diff --git a/lisp/simple.el b/lisp/simple.el
index c358be1810b399dfd76190f3e2fe8801fbe0ac8b..2f07e1487cc87ba766c295bc982a47b7a201e651 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4919,7 +4919,7 @@ is the substring.)")
                 ;; when completing file names.  It's not even clear what
                 ;; is TRT.
                 0
-              (- common-string-length (- (point) (point-max))))))
+              (- common-string-length (- (point-max) (point))))))
     (with-current-buffer standard-output
       (completion-list-mode)
       (set (make-local-variable 'completion-reference-buffer) mainbuf)