Function: viper-can-release-key

viper-can-release-key is a byte-compiled function defined in viper-macs.el.gz.

Signature

(viper-can-release-key CHAR MACRO-ALIST)

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-macs.el.gz
;; Check if MACRO-ALIST has an entry for a macro name starting with
;; CHAR.  If not, this indicates that the binding for this char
;; in viper-vi/insert-kbd-map can be released.
(defun viper-can-release-key (char macro-alist)
  (let ((lis macro-alist)
	(can-release t)
	macro-name)

    (while (and lis can-release)
      (setq macro-name (car (car lis)))
      (if (eq char (aref macro-name 0))
	  (setq can-release nil))
      (setq lis (cdr lis)))
    can-release))