Commit c9993d2a authored by David Byers's avatar David Byers
Browse files

Bug fixes

parent 9252c9f7
No preview for this file type
......@@ -786,6 +786,10 @@ If NOERROR is non-nil, return nil instead of signaling an error."
(xpermanent-list nil)
(xtemporary-list nil))
(while e
(set-filter->function
(filter-entry->filter (car e))
(lyskom-create-compile-filter-function
(filter->pattern (filter-entry->filter (car e)))))
(set (if (filter->attribute (filter-entry->filter (car e))
'expire)
'xtemporary-list
......
......@@ -259,8 +259,8 @@ Returns nil if no such attribute is present."
(defun lyskom-create-compile-filter-function (pattern)
(if (null pattern)
(byte-compile '(lambda (x y) nil)))
(byte-compile (lyskom-create-filter-function pattern)))
(byte-compile '(lambda (x y) nil))
(byte-compile (lyskom-create-filter-function pattern))))
(defun lyskom-create-filter-function (pattern)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment