From cae7fcf92d01240eb8dd6de99ba8add4d85b397e Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 7 May 2010 02:50:26 +0200 Subject: [PATCH] * minibuffer.el (comps): Declare for byte-compiler. --- lisp/ChangeLog | 2 ++ lisp/minibuffer.el | 2 ++ 2 files changed, 4 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4b3852bc3d5..12c9d3c7ec4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2010-05-07 Juanma Barranquero + * minibuffer.el (comps): Declare for byte-compiler. + Fix use of `filter-buffer-substring' (4th arg NOPROPS removed). * emulation/cua-base.el (cua-repeat-replace-region): * emulation/cua-gmrk.el (cua-copy-region-to-global-mark) diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 31bdb6993fa..9ebaf52c886 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -1987,6 +1987,8 @@ filter out additional entries (because TABLE migth not obey PRED)." "Like `reverse' but for a string STR rather than a list." (apply 'string (nreverse (mapcar 'identity str)))) +(defvar comps) + (defun completion--common-suffix (strs) "Return the common suffix of the strings STRS." (completion--sreverse -- 2.39.2