diff options
| author | Kenichi Handa <handa@m17n.org> | 2010-09-01 16:13:21 +0900 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2010-09-01 16:13:21 +0900 |
| commit | 9e69cb054d5c124bdf913c82453518ac4d9d6d53 (patch) | |
| tree | 95537c8c17759cef4da7241d914059d15d7dc0c4 /lisp/play | |
| parent | 0a46a12f7a484e3fab96ea2f46fa738e90dabf1c (diff) | |
| parent | d419e1d94e885388b86f8753d741befa1855d333 (diff) | |
| download | emacs-9e69cb054d5c124bdf913c82453518ac4d9d6d53.tar.gz | |
merge changes in emacs-23 branch
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/cookie1.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/play/cookie1.el b/lisp/play/cookie1.el index 75c0d9b2b06..e786c6cc5c1 100644 --- a/lisp/play/cookie1.el +++ b/lisp/play/cookie1.el @@ -138,7 +138,7 @@ Optional fifth arg REQUIRE-MATCH non-nil forces a matching cookie." (vec (cookie-snarf phrase-file startmsg endmsg)) (i (length vec))) - (while (> (setq i (1- i)) 0) + (while (>= (setq i (1- i)) 0) (setq alist (cons (list (aref vec i)) alist))) (put sym 'completion-alist alist)))) nil require-match nil nil)) |