[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#14181: bug#14184: 24.3.50; customize-face says "read-face-name: Wron
From: |
Tassilo Horn |
Subject: |
bug#14181: bug#14184: 24.3.50; customize-face says "read-face-name: Wrong type argument: sequencep, 97" |
Date: |
Thu, 11 Apr 2013 14:32:19 +0200 |
User-agent: |
Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.3.50 (gnu/linux) |
merge 14184 14181
> A recent change to read-face-name means that typing M-x customize-face
> gives the error "Wrong type argument: sequencep, 97".
Already reported as bug#14181, but without the fix, so thanks. (Not
sure if that merging thing above is actually the right syntax...)
> This change seems to fix it:
>
> diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
> index d19e2de..46c2009 100644
> --- a/lisp/cus-edit.el
> +++ b/lisp/cus-edit.el
> @@ -1319,8 +1319,8 @@ If OTHER-WINDOW is non-nil, display in another window.
>
> Interactively, when point is on text which has a face specified,
> suggest to customize that face, if it's customizable."
> - (interactive (list (read-face-name "Customize face" "all faces" t)))
> - (if (member face '(nil ""))
> + (interactive (list (read-face-name "Customize face" '("all faces") t)))
> + (if (member face '(nil "" (all\ faces)))
> (setq face (face-list)))
> (if (and (listp face) (null (cdr face)))
> (setq face (car face)))
Bye,
Tassilo