Function: hui:menu-line

hui:menu-line is a byte-compiled function defined in hui-mini.el.

Signature

(hui:menu-line MENU-ALIST)

Documentation

Return a menu line string built from MENU-ALIST.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hui-mini.el
(defun hui:menu-line (menu-alist)
  "Return a menu line string built from MENU-ALIST."
  (let ((menu-prompt (concat (caar menu-alist) "  "))
	(menu-items (mapconcat 'car (cdr menu-alist) "  "))
	(width (1- (frame-width)))
	menu-line)
    (setq menu-line (concat menu-prompt menu-items))
    (when (>= (length menu-line) width)
      ;; Narrow menu by changing 2 spaces to 1 if too wide for current frame.
      (setq menu-line (concat menu-prompt (mapconcat #'car (cdr menu-alist) " "))))
    (if (>= (length menu-line) width)
	;; If still too wide, switch to a multi-line layout.
	(hui:menu-multi-line menu-alist)
      menu-line)))