This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 09a1e78fcae36d88f56c6a3267ce72b07ed9f6dd (commit) via e32ec7c0afd112b157e61756256219bb59536857 (commit) from 74c59b7679c19e07fa0866c4aeb1d652856a7ed9 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 09a1e78fcae36d88f56c6a3267ce72b07ed9f6dd Merge: e32ec7c 74c59b7 Author: Raymond Toy <toy.raymond@gmail.com> Date: Sat Mar 3 07:36:13 2012 -0800 Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl commit e32ec7c0afd112b157e61756256219bb59536857 Author: Raymond Toy <toy.raymond@gmail.com> Date: Sat Mar 3 07:34:30 2012 -0800 Return NIL if the prefix isn't a prefix of any name instead of signaling an error. diff --git a/src/code/unidata.lisp b/src/code/unidata.lisp index 32432a1..981e2a7 100644 --- a/src/code/unidata.lisp +++ b/src/code/unidata.lisp @@ -1306,6 +1306,9 @@ do (push (concatenate 'string prefix-match x) names)) (when completep (push prefix-match names)) + (when (zerop (length prefix-match)) + ;; The prefix isn't a prefix for anything, so return nil + (return-from unicode-complete nil)) (flet ((han-or-cjk-completion (prefix-match prefix dictionary) (let* ((prefix-tail (subseq prefix-match (min (length prefix) ----------------------------------------------------------------------- Summary of changes: src/code/unidata.lisp | 3 +++ 1 files changed, 3 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp