Subject: bug#14777: 24.3.50; defcustom (plist): Indentation of the first PROP VALUE pair is too deep

From: Jambunathan K <[email-masked]>
Date: Wed, 03 Jul 2013 18:44:48 +0530

This is a sub-buglet forked off from #14738

1,2 below is a minor bug.

0. C-M-x the below defcustom.  This is copied verbatim from gnus-art.el
1. M-x customize-variable RET gnus-face-properties-alist RET
2. The first PROP VALUE pair in the widget is more indented than the rest.

3. Change the standard value to nil.  C-M-x it.
4. Note the same mal-indentation as in (2).

,----
| Hide Gnus Face Properties Alist:
| INS DEL Image type: nil
|             Plist:
|                         INS DEL Key: nil  <=================== Too indented
|                         Value: nil
|             INS DEL Key: nil
|                         Value: nil
|             INS
| INS
`----

(defcustom gnus-face-properties-alist (if (featurep 'xemacs)
					  '((xface . (:face gnus-x-face)))
					'((pbm . (:face gnus-x-face))
					  (png . nil)))
  "Alist of image types and properties applied to Face and X-Face images.
Here are examples:

;; Specify the altitude of Face images in the From header.
\(setq gnus-face-properties-alist
      '((pbm . (:face gnus-x-face :ascent 80))
	(png . (:ascent 80))))

;; Show Face images as pressed buttons.
\(setq gnus-face-properties-alist
      '((pbm . (:face gnus-x-face :relief -2))
	(png . (:relief -2))))

See the manual for the valid properties for various image types.
Currently, `pbm' is used for X-Face images and `png' is used for Face
images in Emacs.  Only the `:face' property is effective on the `xface'
image type in XEmacs if it is built with the libcompface library."
  :version "23.1" ;; No Gnus
  :group 'gnus-article-headers
  :type '(repeat (cons :format "%v" (symbol :tag "Image type") plist)))

In GNU Emacs 24.3.50.7 (i686-pc-linux-gnu, GTK+ Version 2.20.1)
 of 2013-07-02 on debian-6.05
Bzr revision: 113257 [email-masked]
Windowing system distributor `The X.Org Foundation', version 11.0.10707000
Important settings:
  value of $LANG: en_IN
  locale-coding-system: iso-latin-1-unix
  default enable-multibyte-characters: t