From 7152306251280017923300f2fe0b1c85bbdc6f32 Mon Sep 17 00:00:00 2001 From: ueno Date: Sat, 20 Aug 2005 00:02:38 +0000 Subject: [PATCH] Fixed. --- lisp/riece-addon.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el index 532a328..6ab1c57 100644 --- a/lisp/riece-addon.el +++ b/lisp/riece-addon.el @@ -318,7 +318,7 @@ Useful keys: (when (eq major-mode 'riece-addon-list-mode) (riece-command-list-addons) (let ((point (point-min))) - (while (not (eq (get-text-property point 'riece-addon) addon) + (while (and (not (eq (get-text-property point 'riece-addon) addon)) (setq point (next-single-property-change point 'riece-addon)))) (if point @@ -345,7 +345,7 @@ Useful keys: (when (eq major-mode 'riece-addon-list-mode) (riece-command-list-addons) (let ((point (point-min))) - (while (not (eq (get-text-property point 'riece-addon) addon) + (while (and (not (eq (get-text-property point 'riece-addon) addon)) (setq point (next-single-property-change point 'riece-addon)))) (if point -- 1.7.10.4