diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2011-01-12 10:09:41 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2011-01-12 10:09:41 +0000 |
| commit | a0989ebd96d6e15f24f902a45b9147b10c912974 (patch) | |
| tree | 9e6a80d17d1ce1881a88fdd11c1d7f1f8ea47969 /generic/pg-pamacs.el | |
| parent | da65048c208361c704c6a2c200a7553a83f191a0 (diff) | |
Fix quoting in 'float patch.
Diffstat (limited to 'generic/pg-pamacs.el')
| -rw-r--r-- | generic/pg-pamacs.el | 4 |
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 |