From 1a28b7216ae8f5955a382caab44acbed6b716573 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 30 Oct 2002 05:42:40 +0000 Subject: [PATCH] Synch with emacs-w3m. * dgnushack.el (dgnushack-bind-colon-keywords): Protect against unexpected data structure. --- ChangeLog | 5 +++++ lisp/dgnushack.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 160ccb9..fcc3ca2 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-10-30 TSUCHIYA Masatoshi + + * lisp/dgnushack.el (dgnushack-bind-colon-keywords): Protect + against unexpected data structure. + 2002-10-09 Katsumi Yamaoka * lisp/gnus-vers.el (gnus-revision-number): Increment to 02. diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el index e3b3e53..e058281 100644 --- a/lisp/dgnushack.el +++ b/lisp/dgnushack.el @@ -347,7 +347,8 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again. (error nil))) (when (listp form) (while form - (setq elem (pop form)) + (setq elem (car-safe form) + form (cdr-safe form)) (unless (memq (car-safe elem) '(defcustom defface defgroup define-widget quote)) -- 1.7.10.4