NOTE: This patch has been committed. The version below is
informational only (whitespace differences have been removed).
Dear reviewers,
the following patch fixes some misuses of the list widget type.
xemacs-packages/liece/lisp/ChangeLog addition:
2007-09-04 Didier Verna <didier(a)xemacs.org>
* liece-hilit.el (liece-quoted-colors-ircle): Fix misuse of the
list widget type.
* liece-hilit.el (liece-quoted-colors-mirc): Ditto.
* liece-tcp.el (liece-tcp-rlogin-parameters): Ditto.
XEmacs Packages source patch:
Diff command: cvs -q diff -u -t -b -B -w
Files affected: xemacs-packages/liece/lisp/liece-tcp.el
xemacs-packages/liece/lisp/liece-hilit.el
Index: xemacs-packages/liece/lisp/liece-hilit.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/liece/lisp/liece-hilit.el,v
retrieving revision 1.1
diff -u -u -t -b -B -w -r1.1 liece-hilit.el
--- xemacs-packages/liece/lisp/liece-hilit.el 23 Mar 2002 05:51:28 -0000 1.1
+++ xemacs-packages/liece/lisp/liece-hilit.el 4 Sep 2007 09:03:48 -0000
@@ -131,7 +131,7 @@
"cyan4" "turquoise" "blue" "black"
"black" "black" "black" "black"
"DarkBlue" "purple1" "purple2" "purple3"
"magenta")
"Color list for displaying \003 quoted string."
-:type '(list (radio string face))
+:type '(repeat (radio string face))
:group 'liece-highlight)
(defcustom liece-quoted-colors-mirc
@@ -139,7 +139,7 @@
"orange" "yellow" "green" "cyan4"
"turquoise" "RoyalBlue" "HotPink"
"gray50" "gray75" "black" "black"
"black" "black")
"Color list for displaying \013 quoted string."
-:type '(list (radio string face))
+:type '(repeat (radio string face))
:group 'liece-highlight)
(defcustom liece-highlight-jingle-function nil
Index: xemacs-packages/liece/lisp/liece-tcp.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/liece/lisp/liece-tcp.el,v
retrieving revision 1.1
diff -u -u -t -b -B -w -r1.1 liece-tcp.el
--- xemacs-packages/liece/lisp/liece-tcp.el 23 Mar 2002 05:51:36 -0000 1.1
+++ xemacs-packages/liece/lisp/liece-tcp.el 4 Sep 2007 09:03:48 -0000
@@ -98,7 +98,7 @@
(defcustom liece-tcp-rlogin-parameters '("socket" "-q")
"Parameters to `liece-tcp-open-rlogin'."
-:type 'list
+:type '(repeat string)
:group 'liece-tcp)
(defcustom liece-tcp-rlogin-user-name nil
--
MySpace:
http://www.myspace.com/didierverna
Didier Verna, didier(a)lrde.epita.fr,
http://www.lrde.epita.fr/~didier
EPITA / LRDE, 14-16 rue Voltaire Tel.+33 (1) 44 08 01 85
94276 Le Kremlin-Bicêtre, France Fax.+33 (1) 53 14 59 22 didier(a)xemacs.org
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches