aboutsummaryrefslogtreecommitdiffhomepage
path: root/generic/pg-pamacs.el
diff options
context:
space:
mode:
Diffstat (limited to 'generic/pg-pamacs.el')
-rw-r--r--generic/pg-pamacs.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/pg-pamacs.el b/generic/pg-pamacs.el
index 60863d13..a8e3f67c 100644
--- a/generic/pg-pamacs.el
+++ b/generic/pg-pamacs.el
@@ -165,8 +165,8 @@ Usage: (defpgdefault SYM VALUE)"
(setq args (cdr args)))
((eq (car args) :type)
(setq type (cadr args))
- (if (eq type 'float)
- (setq type 'number)) ; widget type for defcustom
+ (if (eq (eval type) 'float)
+ (setq type (quote 'number))) ; widget type for defcustom
(setq args (cdr args))
(setq newargs (cons type (cons :type newargs))))
(t