Re: Can't customize nnimap groups

[Per Abrahamsen <abraham@dina.kvl.dk>]

Christoph Rohland <hans-christoph.rohland@sap.com> writes:

> But this is only supported for know group parameters. Other variables
> should be set with ((foo "42)). That's how I read the info file.

Actually, it is both.  Variables are supposed to be of the form above,
but customize is supposed to be robust enough to handle unknown group
parameters.   

This patch should fix the problem.

2000-02-02  Per Abrahamsen  <abraham@dina.kvl.dk>

	* wid-edit.el (widget-match-inline): An atom never matches a
          list.  

Index: wid-edit.el
===================================================================
RCS file: /gd/gnu/cvsroot/emacs/lisp/wid-edit.el,v
retrieving revision 1.62
diff -c -r1.62 wid-edit.el
*** wid-edit.el	1999/11/09 13:42:34	1.62
--- wid-edit.el	2000/02/02 10:56:09
***************
*** 1,6 ****
  ;;; wid-edit.el --- Functions for creating and using widgets.
  ;;
! ;; Copyright (C) 1996, 1997, 1999 Free Software Foundation, Inc.
  ;;
  ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
  ;; Maintainer: FSF
--- 1,6 ----
  ;;; wid-edit.el --- Functions for creating and using widgets.
  ;;
! ;; Copyright (C) 1996, 1997, 1999, 2000 Free Software Foundation, Inc.
  ;;
  ;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
  ;; Maintainer: FSF
***************
*** 492,498 ****
    "In WIDGET, match the start of VALS."
    (cond ((widget-get widget :inline)
  	 (widget-apply widget :match-inline vals))
! 	((and vals
  	      (widget-apply widget :match (car vals)))
  	 (cons (list (car vals)) (cdr vals)))
  	(t nil)))
--- 492,498 ----
    "In WIDGET, match the start of VALS."
    (cond ((widget-get widget :inline)
  	 (widget-apply widget :match-inline vals))
! 	((and (listp vals)
  	      (widget-apply widget :match (car vals)))
  	 (cons (list (car vals)) (cdr vals)))
  	(t nil)))