variant (if (> (length key-seq) 0)
(prin1-to-string (vip-display-macro key-seq))
"")))
- (message message)
+ (message "%s" message)
(setq event (vip-read-key))
;;(setq event (vip-read-event))
(setq key
(prin1-to-string
(vip-display-macro key-seq))
"")))
- (message message)
+ (message "%s" message)
(setq event (vip-read-key))
;;(setq event (vip-read-event))
(setq key
scope)
vip-custom-file-name))
- (message msg)
+ (message "%s" msg)
))
(setq new-elt