From e21c148e2ccd96cfceeecde86d6d91782fa7bae2 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 17 Apr 2005 16:00:48 +0000 Subject: [PATCH] (jka-compr-compression-info-list): Fix custom type. --- lisp/jka-compr.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index 59c6de846c2..5bda4349288 100644 --- a/lisp/jka-compr.el +++ b/lisp/jka-compr.el @@ -198,12 +198,16 @@ invoked." (choice :tag "Compress Message" (string :format "%v") (const :tag "No Message" nil)) - (string :tag "Compress Program") + (choice :tag "Compress Program" + (string) + (const :tag "None" nil)) (repeat :tag "Compress Arguments" string) (choice :tag "Uncompress Message" (string :format "%v") (const :tag "No Message" nil)) - (string :tag "Uncompress Program") + (choice :tag "Uncompress Program" + (string) + (const :tag "None" nil)) (repeat :tag "Uncompress Arguments" string) (boolean :tag "Append") (boolean :tag "Strip Extension") -- 2.39.2