Customize: Space char in `character' specification

[Reiner Steib <reinersteib+gmane@imap.cc>]

Hi,

I can't seem to find the right syntax for the following defcustom, or
there's a bug in customize (both, Emacs 21 and 22):

(defcustom rs-test-list-char-string
  '("<body[^>]*>"
    ((?&  . "&amp;")
     (?   . "&nbsp;") ;; This is the problematic entry
     (?\n . "<br>")
     ))
  "List for inserting mail headers into the HTML output."
  :type '(choice
	  (list :tag "Default"
		(regexp :tag "Body regexp" "<body[^>]*>")
		(repeat :value ((?&  . "&amp;")
				(?   . "&nbsp;")
				(?\n . "<br>"))
			(cons (character) (string :tag "Replacement"))))))

After modifying the "Body regexp" and pressing "Set for Current
Session", I get "This field should contain a single character". 

I can reproduce the same problem with the following defcustom:

(defcustom rs-test-char
  ?  ;; whitespace
  "Foo bar"
  :type '(character))

Replace the space character with some other character and change is
back to a space.  "Set for Current Session" again barfs with "This
field should contain a single character".

What am I doing wrong?

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/