Function: kmacro-ring-empty-p

kmacro-ring-empty-p is a byte-compiled function defined in kmacro.el.gz.

Signature

(kmacro-ring-empty-p &optional NONE)

Documentation

Tell user and return t if last-kbd-macro is nil or kmacro-ring is empty.

Check only last-kbd-macro if optional arg NONE is non-nil.

Source Code

;; Defined in /usr/src/emacs/lisp/kmacro.el.gz
(defun kmacro-ring-empty-p (&optional none)
  "Tell user and return t if `last-kbd-macro' is nil or `kmacro-ring' is empty.
Check only `last-kbd-macro' if optional arg NONE is non-nil."
  (while (and (null last-kbd-macro) kmacro-ring)
    (kmacro-pop-ring1))
  (cond
   ((null last-kbd-macro)
    (message "No keyboard macro defined.")
    t)
   ((and (null none) (null kmacro-ring))
    (message "Only one keyboard macro defined.")
    t)
   (t nil)))