Lines Matching defs:idlwave
35 ;; http://idlwave.org
43 (defun idlwave-toolbar-make-button (image)
48 (defvar idlwave-toolbar)
50 (defvar idlwave-toolbar-is-possible)
64 (defconst idlwave-toolbar-is-possible t
66 (defvar idlwave-toolbar-compile-icon
67 (idlwave-toolbar-make-button
103 (defvar idlwave-toolbar-next-error-icon
104 (idlwave-toolbar-make-button
141 (defvar idlwave-toolbar-stop-at-icon
142 (idlwave-toolbar-make-button
180 (defvar idlwave-toolbar-clear-at-icon
181 (idlwave-toolbar-make-button
218 (defvar idlwave-toolbar-clear-all-icon
219 (idlwave-toolbar-make-button
257 (defvar idlwave-toolbar-stop-beginning-icon
258 (idlwave-toolbar-make-button
296 (defvar idlwave-toolbar-stop-in-icon
297 (idlwave-toolbar-make-button
335 (defvar idlwave-toolbar-edit-cmd-icon
336 (idlwave-toolbar-make-button
372 (defvar idlwave-toolbar-run-icon
373 (idlwave-toolbar-make-button
410 (defvar idlwave-toolbar-cont-icon
411 (idlwave-toolbar-make-button
448 (defvar idlwave-toolbar-to-here-icon
449 (idlwave-toolbar-make-button
487 (defvar idlwave-toolbar-step-over-icon
488 (idlwave-toolbar-make-button
525 (defvar idlwave-toolbar-step-into-icon
526 (idlwave-toolbar-make-button
563 (defvar idlwave-toolbar-step-out-icon
564 (idlwave-toolbar-make-button
602 (defvar idlwave-toolbar-eval-icon
603 (idlwave-toolbar-make-button
639 (defvar idlwave-toolbar-stack-up-icon
640 (idlwave-toolbar-make-button
679 (defvar idlwave-toolbar-stack-down-icon
680 (idlwave-toolbar-make-button
719 (defvar idlwave-toolbar-reset-icon
720 (idlwave-toolbar-make-button
757 (defvar idlwave-toolbar-electric-debug-icon
758 (idlwave-toolbar-make-button
800 (defvar idlwave-toolbar
802 [idlwave-toolbar-compile-icon
803 idlwave-shell-save-and-compile
806 [idlwave-toolbar-next-error-icon
807 idlwave-shell-goto-next-error
810 [idlwave-toolbar-stop-at-icon
811 idlwave-shell-break-here
812 (eq major-mode 'idlwave-mode)
814 [idlwave-toolbar-clear-at-icon
815 idlwave-shell-clear-current-bp
818 [idlwave-toolbar-clear-all-icon
819 idlwave-shell-clear-all-bp
822 [idlwave-toolbar-stop-beginning-icon
823 idlwave-shell-break-this-module
824 (eq major-mode 'idlwave-mode)
826 [idlwave-toolbar-stop-in-icon
827 idlwave-shell-break-in
830 [idlwave-toolbar-edit-cmd-icon
831 idlwave-shell-edit-default-command-line
834 [idlwave-toolbar-run-icon
835 idlwave-shell-execute-default-command-line
838 [idlwave-toolbar-cont-icon
839 idlwave-shell-cont
842 [idlwave-toolbar-to-here-icon
843 idlwave-shell-to-here
844 (eq major-mode 'idlwave-mode)
846 [idlwave-toolbar-step-over-icon
847 idlwave-shell-stepover
850 [idlwave-toolbar-step-into-icon
851 idlwave-shell-step
854 [idlwave-toolbar-step-out-icon
855 idlwave-shell-out
858 [idlwave-toolbar-eval-icon
859 idlwave-shell-print
862 [idlwave-toolbar-stack-up-icon
863 idlwave-shell-stack-up
866 [idlwave-toolbar-stack-down-icon
867 idlwave-shell-stack-down
870 [idlwave-toolbar-reset-icon
871 idlwave-shell-reset
874 [idlwave-toolbar-electric-debug-icon
875 idlwave-shell-electric-debug-mode
876 (eq major-mode 'idlwave-mode)
881 (add-hook 'idlwave-shell-cleanup-hook
882 'idlwave-toolbar-remove-everywhere)
885 (defun idlwave-toolbar-add ()
888 (boundp 'idlwave-toolbar-is-possible)
889 (or (eq major-mode 'idlwave-mode)
890 (eq major-mode 'idlwave-shell-mode)))
892 idlwave-toolbar))))
894 (defun idlwave-toolbar-remove ()
897 (boundp 'idlwave-toolbar-is-possible)
898 (or (eq major-mode 'idlwave-mode)
899 (eq major-mode 'idlwave-shell-mode)))
902 (defvar idlwave-shell-mode-map)
903 (defvar idlwave-mode-map)
904 (defvar idlwave-toolbar-visible nil)
905 (defun idlwave-toolbar-add-everywhere ()
907 (when (boundp 'idlwave-toolbar-is-possible)
910 (add-hook 'idlwave-mode-hook 'idlwave-toolbar-add)
917 (idlwave-toolbar-add))
932 (define-key idlwave-mode-map key def)
933 (define-key idlwave-shell-mode-map key def)))
934 (reverse idlwave-toolbar)))
935 (setq idlwave-toolbar-visible t)))
937 (defun idlwave-toolbar-remove-everywhere ()
940 (when idlwave-toolbar-is-possible
941 (remove-hook 'idlwave-mode-hook 'idlwave-toolbar-add)
948 (idlwave-toolbar-remove))
957 (define-key idlwave-mode-map key nil)
958 (define-key idlwave-shell-mode-map key nil)))
959 idlwave-toolbar))
960 (setq idlwave-toolbar-visible nil)))
962 (defun idlwave-toolbar-toggle (&optional force-on)
964 (if idlwave-toolbar-visible
965 (or force-on (idlwave-toolbar-remove-everywhere))
966 (idlwave-toolbar-add-everywhere))
974 (provide 'idlwave-toolbar)