gitback/el-get
1
0
Fork 0
mirror of https://github.com/dimitri/el-get.git synced 2024-09-29 04:58:53 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix el-get-symbol customization widget

Browse Source
This commit is contained in:
Dave Abrahams 2011-05-27 16:47:59 -04:00
parent da23a4c80f
commit 7a23356096
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
el-get.el
View File

@ -410,16 +410,13 @@ returning a list that contains it (and only it)."
:value-to-internal 'el-get-repeat-value-to-internal
:match 'el-get-repeat-match)
(defun el-get-symbol-value-to-internal (widget string-or-symbol)
(el-get-as-symbol string-or-symbol))
(defun el-get-symbol-match (widget value)
(or (symbolp value) (stringp value)))
(define-widget 'el-get-symbol 'symbol
"A string or a symbol, rendered as a symbol"
:value-to-internal 'el-get-symbol-value-to-internal
:match 'el-get-symbol-match)
:match 'el-get-symbol-match
)
;;; END "Fuzzy" data structure support