Function: idlwave-toolbar-add-everywhere

idlwave-toolbar-add-everywhere is an autoloaded and byte-compiled function defined in idlw-toolbar.el.gz.

Signature

(idlwave-toolbar-add-everywhere)

Documentation

Add the toolbar in all appropriate buffers.

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/idlw-toolbar.el.gz
(defun idlwave-toolbar-add-everywhere ()
  "Add the toolbar in all appropriate buffers."
  (when (boundp 'idlwave-toolbar-is-possible)

    ;; Then add it to all existing buffers
    ;; For Emacs, add the key definitions to the mode maps
    (mapc (lambda (x)
	    (let* ((icon (aref x 0))
		   (func (aref x 1))
		   (show (aref x 2))
		   (help (aref x 3))
		   (key (vector 'tool-bar func))
		   (def (list 'menu-item
			      ""
			      func
			      :image (symbol-value icon)
			      :visible show
			      :help help)))
	      (define-key idlwave-mode-map key def)
	      (define-key idlwave-shell-mode-map key def)))
	  (reverse idlwave-toolbar))
    (setq idlwave-toolbar-visible t)))