]> git.eshelyaron.com Git - emacs.git/commitdiff
(all-completions): Declare the 4th arg obsolete.
authorStefan Monnier <monnier@iro.umontreal.ca>
Mon, 26 Oct 2009 03:39:15 +0000 (03:39 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Mon, 26 Oct 2009 03:39:15 +0000 (03:39 +0000)
etc/NEWS
lisp/ChangeLog
lisp/minibuffer.el
lisp/subr.el
src/minibuf.c

index ade1f6bd750b914b5383975def3e8f558fa6bb3d..1788101ce927fff066cd8652a4e6dabb672186f6 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -256,6 +256,8 @@ Command*'.
 \f
 * Lisp changes in Emacs 23.2
 
+** The 4th arg to all-completions (aka hide-spaces) is declared obsolete.
+
 ** read-file-name-predicate is obsolete.  It was used to pass the predicate
 to read-file-name-internal because read-file-name-internal abused its `pred'
 argument to pass the current directory, but this hack is not needed
index 0ff59e4ef35e8f69f4c7ac33f7fbc17f7d7e1630..4e210449f1fad179e70dc0568aa278502642752a 100644 (file)
@@ -1,3 +1,7 @@
+2009-10-26  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * subr.el (all-completions): Declare the 4th arg obsolete.
+
 2009-10-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * pcomplete.el (pcomplete-unquote-argument-function): New var.
        * bookmark.el (bookmark-bmenu-list): Don't use switch-to-buffer if
        we're inside a dedicated or minibuffer window.
 
+2009-10-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * cedet/semantic/fw.el (semantic-alias-obsolete)
+       (semantic-varalias-obsolete): Make the `when' arg mandatory.
+       (define-mode-overload-implementation):
+       * cedet/semantic/decorate/mode.el (semantic-decorate-pending-decoration-hooks):
+       * cedet/semantic/wisent.el (wisent-lex-make-token-table):
+       * cedet/semantic/util.el (semantic-file-token-stream)
+       (semantic-something-to-stream):
+       * cedet/semantic/tag.el (semantic-tag-make-assoc-list)
+       (semantic-expand-nonterminal):
+       * cedet/semantic/tag-file.el (semantic-find-nonterminal)
+       (semantic-find-dependency, semantic-find-nonterminal)
+       (semantic-find-dependency):
+       * cedet/semantic/lex.el (semantic-flex-start, semantic-flex-end)
+       (semantic-flex-text, semantic-flex-make-keyword-table)
+       (semantic-flex-keyword-p, semantic-flex-keyword-put)
+       (semantic-flex-keyword-get, semantic-flex-map-keywords)
+       (semantic-flex-keywords, semantic-flex-buffer, semantic-flex-list):
+       * cedet/semantic/java.el (semantic-java-prototype-nonterminal):
+       * cedet/semantic/idle.el (semantic-before-idle-scheduler-reparse-hooks)
+       (semantic-after-idle-scheduler-reparse-hooks):
+       * cedet/semantic/edit.el (semantic-edits-incremental-reparse-failed-hooks):
+       * cedet/semantic/db-mode.el (semanticdb-mode-hooks):
+       * cedet/semantic.el (semantic-toplevel-bovine-table)
+       (semantic-toplevel-bovine-cache)
+       (semantic-before-toplevel-bovination-hook, semantic-init-hooks)
+       (semantic-init-mode-hooks, semantic-init-db-hooks)
+       (semantic-bovination-working-type): Provide the `when' arg.
+
 2009-10-24  Karl Fogel  <kfogel@red-bean.com>
 
        * bookmark.el: Update documentation, especially documentation
index 014faeac79c9988d54e653452e6286714b640c4a..783e219199b44f66388215cd8eddf5f775393ccd 100644 (file)
 ;;   corresponding to the displayed completions because we only
 ;;   provide the start info but not the end info in
 ;;   completion-base-position.
+;; - quoting is problematic.  E.g. the double-dollar quoting used in
+;;   substitie-in-file-name (and hence read-file-name-internal) bumps
+;;   into various bugs:
 ;; - choose-completion doesn't know how to quote the text it inserts.
 ;;   E.g. it fails to double the dollars in file-name completion, or
 ;;   to backslash-escape spaces and other chars in comint completion.
+;;   - when completing ~/tmp/fo$$o, the highligting in *Completions*
+;;     is off by one position.
+;;   - all code like PCM which relies on all-completions to match
+;;     its argument gets confused because all-completions returns unquoted
+;;     texts (as desired for *Completions* output).
 ;; - C-x C-f ~/*/sr ? should not list "~/./src".
 ;; - minibuffer-force-complete completes ~/src/emacs/t<!>/lisp/minibuffer.el
 ;;   to ~/src/emacs/trunk/ and throws away lisp/minibuffer.el.
@@ -72,8 +80,6 @@
 ;; - add support for ** to pcm.
 ;; - Add vc-file-name-completion-table to read-file-name-internal.
 ;; - A feature like completing-help.el.
-;; - make lisp/complete.el obsolete.
-;; - Make the `hide-spaces' arg of all-completions obsolete?
 
 ;;; Code:
 
index 9d49075a469f7354fb658fcb4e3eca4eb9a3bbaf..30107edd4a4c1d808cd8cdd26ead66f5b1a9de55 100644 (file)
@@ -1038,6 +1038,8 @@ is converted into a string by expressing it in decimal."
               "explicitly check for a frame-parameter instead." "22.2")
 (make-obsolete 'interactive-p 'called-interactively-p "23.2")
 (set-advertised-calling-convention 'called-interactively-p '(kind))
+(set-advertised-calling-convention
+ 'all-completions '(string collection &optional predicate))
 \f
 ;;;; Obsolescence declarations for variables, and aliases.
 
@@ -1885,11 +1887,13 @@ any other non-digit terminates the character code and is then used as input."))
             ;; Turn a meta-character into a character with the 0200 bit set.
             (setq code (logior (logand translated (lognot ?\M-\^@)) 128)
                   done t))
-           ((and (<= ?0 translated) (< translated (+ ?0 (min 10 read-quoted-char-radix))))
+           ((and (<= ?0 translated)
+                  (< translated (+ ?0 (min 10 read-quoted-char-radix))))
             (setq code (+ (* code read-quoted-char-radix) (- translated ?0)))
             (and prompt (setq prompt (message "%s %c" prompt translated))))
            ((and (<= ?a (downcase translated))
-                 (< (downcase translated) (+ ?a -10 (min 36 read-quoted-char-radix))))
+                 (< (downcase translated)
+                     (+ ?a -10 (min 36 read-quoted-char-radix))))
             (setq code (+ (* code read-quoted-char-radix)
                           (+ 10 (- (downcase translated) ?a))))
             (and prompt (setq prompt (message "%s %c" prompt translated))))
index fc876370a2d1e4aeb3fa227c27055df372043f8c..6a2d52ae6b75e5b6a7317a8c3484315560225d5d 100644 (file)
@@ -1561,9 +1561,9 @@ predicate is called with two arguments: the key and the value.
 Additionally to this predicate, `completion-regexp-list'
 is used to further constrain the set of candidates.
 
-If the optional fourth argument HIDE-SPACES is non-nil,
-strings in COLLECTION that start with a space
-are ignored unless STRING itself starts with a space.  */)
+An osbolete optional fourth argument HIDE-SPACES is still accepted for
+backward compatiblity.  If non-nil, strings in COLLECTION that start
+with a space are ignored unless STRING itself starts with a space.  */)
      (string, collection, predicate, hide_spaces)
      Lisp_Object string, collection, predicate, hide_spaces;
 {