Function: pr-global-menubar

pr-global-menubar is a byte-compiled function defined in printing.el.gz.

Signature

(pr-global-menubar MENU-SPEC)

Source Code

;; Defined in /usr/src/emacs/lisp/printing.el.gz
(defun pr-global-menubar (menu-spec)
  (let ((menu-file '("menu-bar" "file"))
        (submenu-path [menu-bar file Print])
        (submenu (easy-menu-create-menu "Print" menu-spec)))
    (cond (pr-menu-print-item
           (easy-menu-add-item global-map menu-file submenu "Print")
           (easy-menu-remove-item global-map menu-file "print")
           (setq pr-menu-print-item nil
                 pr-menu-bar submenu-path))
          (t (easy-menu-add-item global-map menu-file submenu)))))