Mercurial > emacs
changeset 66178:6c46e0e1ba7b
Install to the CVS repository what I forgot to install in my
2005-10-16 changes.
* progmodes/python.el (python-complete-symbol): Pass the common
prefix substring of completion to `display-completion-list'.
* textmodes/org.el (org-complete): Ditto.
| author | Masatake YAMATO <jet@gyve.org> |
|---|---|
| date | Tue, 18 Oct 2005 04:31:16 +0000 |
| parents | bd98d8a37303 |
| children | 6c8bcb760760 |
| files | lisp/ChangeLog lisp/progmodes/python.el lisp/textmodes/org.el |
| diffstat | 3 files changed, 12 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Oct 18 04:21:51 2005 +0000 +++ b/lisp/ChangeLog Tue Oct 18 04:31:16 2005 +0000 @@ -1,3 +1,13 @@ +2005-10-18 Masatake YAMATO <jet@gyve.org> + + Install to the CVS repository what I forgot to install in my + 2005-10-16 changes. + + * progmodes/python.el (python-complete-symbol): Pass the common + prefix substring of completion to `display-completion-list'. + + * textmodes/org.el (org-complete): Ditto. + 2005-10-18 Masatake YAMATO <jet@gyve.org> Fix a bug reported by Sven Joachim <sven_joachim@web.de>. @@ -219,12 +229,9 @@ * progmodes/pascal.el (pascal-complete-word) (pascal-show-completions): Ditto. - * progmodes/python.el (python-complete-symbol): Ditto. * textmodes/bibtex.el (bibtex-complete-internal): Ditto. - * textmodes/org.el (org-complete): Ditto. - * simple.el (completion-common-substring): New variable. (completion-setup-function): Use `completion-common-substring' to put faces.
--- a/lisp/progmodes/python.el Tue Oct 18 04:21:51 2005 +0000 +++ b/lisp/progmodes/python.el Tue Oct 18 04:31:16 2005 +0000 @@ -1652,7 +1652,7 @@ (t (message "Making completion list...") (with-output-to-temp-buffer "*Completions*" - (display-completion-list completions)) + (display-completion-list completions symbol)) (message "Making completion list...%s" "done")))))))) (eval-when-compile (require 'hippie-exp))
--- a/lisp/textmodes/org.el Tue Oct 18 04:21:51 2005 +0000 +++ b/lisp/textmodes/org.el Tue Oct 18 04:31:16 2005 +0000 @@ -2844,7 +2844,7 @@ (message "Making completion list...") (let ((list (sort (all-completions pattern table) 'string<))) (with-output-to-temp-buffer "*Completions*" - (display-completion-list list))) + (display-completion-list list pattern))) (message "Making completion list...%s" "done")))))) ;;; Comments, TODO and DEADLINE