(lambda (module)
(setq filename (concat (symbol-name module) ".el"))
(unless (file-exists-p (expand-file-name filename WLDIR))
- (add-to-list 'lost symbol)))
+ (add-to-list 'lost filename)))
WL-MODULES)
lost))))
(lambda (module)
(setq filename (concat (symbol-name module) ".el"))
(unless (file-exists-p (expand-file-name filename ELMODIR))
- (add-to-list 'lost symbol)))
+ (add-to-list 'lost filename)))
ELMO-MODULES)
lost))))
(require 'wl-demo)
(lunit-assert
(file-exists-p
- (expand-file-name (concat wl-demo-icon-name ".xpm") ICONDIR))))
+ (expand-file-name (concat (wl-demo-icon-name) ".xpm") ICONDIR))))
(luna-define-method test-version-status-icon-xbm ((case test-dist))
(require 'wl-demo)
(lunit-assert
(file-exists-p
- (expand-file-name (concat wl-demo-icon-name ".xbm") ICONDIR))))
+ (expand-file-name (concat (wl-demo-icon-name) ".xbm") ICONDIR))))
;; verstion.texi
(luna-define-method test-texi-version ((case test-dist))