procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/cedet/semantic/util.el (semantic-complete-symbol):

Browse source 
Replace use of obsolete argument of display-completion-list.
This commit is contained in:
Glenn Morris 2014-03-04 00:37:48 -08:00
parent d82e752c05
commit c60ed8728a
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/cedet/ChangeLog
View file

@ -1,3 +1,8 @@
2014-03-04 Glenn Morris <rgm@gnu.org>
* semantic/util.el (semantic-complete-symbol):
Replace use of obsolete argument of display-completion-list.
2014-02-03 Glenn Morris <rgm@gnu.org>
* semantic/senator.el (senator-copy-tag-to-register):

3
lisp/cedet/semantic/util.el
View file

@ -419,7 +419,8 @@ determining which symbols are considered."
(setq list (sort list 'string<))
(if (> (length list) 1)
(with-output-to-temp-buffer "*Completions*"
(display-completion-list list pattern))
(display-completion-list
(completion-hilit-commonality list (length pattern) nil)))
;; Bury any out-of-date completions buffer.
(let ((win (get-buffer-window "*Completions*" 0)))
(if win (with-selected-window win (bury-buffer))))))