81
81
:link '(info-link :tag " Info Manual" " (gnuplot)" )
82
82
:link '(emacs-commentary-link :tag " Commentary" " gnuplot.el" ))
83
83
84
- (defgroup gnuplot-insertions nil
85
- " Insert commands into gnuplot-scripts from a pull-down menu."
86
- :prefix " gnuplot-insertions-"
87
- :group 'gnuplot )
88
-
89
84
(defgroup gnuplot-hooks nil
90
85
" Hook variables used by `gnuplot-mode' ."
91
86
:prefix " gnuplot-"
@@ -176,12 +171,6 @@ and start it again."
176
171
:group 'gnuplot
177
172
:type 'boolean )
178
173
179
- (defcustom gnuplot-insertions-show-help-flag nil
180
- " Non-nil means to display certain help messages automatically.
181
- These messages are shown after menu insertion of gnuplot commands."
182
- :group 'gnuplot-insertions
183
- :type 'boolean )
184
-
185
174
(defcustom gnuplot-delay 0.02
186
175
" Amount of time to delay before sending a new line to gnuplot.
187
176
This is needed so that the the line is not written in the gnuplot
@@ -400,6 +389,11 @@ non-nil."
400
389
401
390
; ;; --- insertions variables and menus
402
391
392
+ (defgroup gnuplot-insertions nil
393
+ " Insert commands into gnuplot-scripts from a pull-down menu."
394
+ :prefix " gnuplot-insertions-"
395
+ :group 'gnuplot )
396
+
403
397
(defvar gnuplot--insertions-menu nil
404
398
" Menu for insertions in `gnuplot-mode' .
405
399
@@ -441,19 +435,23 @@ adding the \"regis\" terminal type to the terminal sub-menu:
441
435
(gnuplot-insert \" set terminal regis\" )
442
436
t]))))" )
443
437
444
- (defvar gnuplot-insertions-top
445
- '( " insert set expression " " --- " )
446
- " Top part of insertions menu.
447
- See the document string for `gnuplot--insertions-menu' " )
438
+ (defcustom gnuplot-insertions-show-help-flag nil
439
+ " Non-nil means to display certain help messages automatically.
440
+ These messages are shown after menu insertion of gnuplot commands. "
441
+ :type 'boolean )
448
442
449
443
(defcustom gnuplot-insertions-menu-flag t
450
444
" Non-nil means to place the insertion menu in the menubar.
451
445
Changing this will not effect a change in any currently existing
452
446
`gnuplot-mode' buffer. You will see the change the next time you
453
447
create a `gnuplot-mode' buffer."
454
- :group 'gnuplot-insertions
455
448
:type 'boolean )
456
449
450
+ (defvar gnuplot-insertions-top
451
+ '(" insert set expression" " ---" )
452
+ " Top part of insertions menu.
453
+ See the document string for `gnuplot--insertions-menu' " )
454
+
457
455
(defcustom gnuplot-insertions-adornments ; this is icky...
458
456
'(" adornments"
459
457
[" arrow" (gnuplot-insert " set arrow " ) t]
@@ -479,7 +477,6 @@ See the document string for `gnuplot--insertions-menu'
479
477
Changing this will not effect a change in any currently existing
480
478
`gnuplot-mode' buffer. You will see the change the next time you
481
479
create a `gnuplot-mode' buffer."
482
- :group 'gnuplot-insertions
483
480
:type '(list (string :tag " Title" )
484
481
(repeat :inline t
485
482
(vector (string :tag " Name" )
@@ -505,7 +502,6 @@ See the document string for `gnuplot--insertions-menu'
505
502
Changing this will not effect a change in any currently existing
506
503
`gnuplot-mode' buffer. You will see the change the next time you
507
504
create a `gnuplot-mode' buffer."
508
- :group 'gnuplot-insertions
509
505
:type '(list (string :tag " Title" )
510
506
(repeat :inline t
511
507
(vector (string :tag " Name" )
@@ -535,7 +531,6 @@ See the document string for `gnuplot--insertions-menu'
535
531
Changing this will not effect a change in any currently existing
536
532
`gnuplot-mode' buffer. You will see the change the next time you
537
533
create a `gnuplot-mode' buffer."
538
- :group 'gnuplot-insertions
539
534
:type '(list (string :tag " Title" )
540
535
(repeat :inline t
541
536
(vector (string :tag " Name" )
@@ -557,7 +552,6 @@ See the document string for `gnuplot--insertions-menu'
557
552
Changing this will not effect a change in any currently existing
558
553
`gnuplot-mode' buffer. You will see the change the next time you
559
554
create a `gnuplot-mode' buffer."
560
- :group 'gnuplot-insertions
561
555
:type '(list (string :tag " Title" )
562
556
(repeat :inline t
563
557
(vector (string :tag " Name" )
@@ -579,7 +573,6 @@ See the document string for `gnuplot--insertions-menu'
579
573
Changing this will not effect a change in any currently existing
580
574
`gnuplot-mode' buffer. You will see the change the next time you
581
575
create a `gnuplot-mode' buffer."
582
- :group 'gnuplot-insertions
583
576
:type '(list (string :tag " Title" )
584
577
(repeat :inline t
585
578
(vector (string :tag " Name" )
@@ -601,7 +594,6 @@ See the document string for `gnuplot--insertions-menu'
601
594
Changing this will not effect a change in any currently existing
602
595
`gnuplot-mode' buffer. You will see the change the next time you
603
596
create a `gnuplot-mode' buffer."
604
- :group 'gnuplot-insertions
605
597
:type '(list (string :tag " Title" )
606
598
(repeat :inline t
607
599
(vector (string :tag " Name" )
@@ -623,7 +615,6 @@ See the document string for `gnuplot--insertions-menu'
623
615
Changing this will not effect a change in any currently existing
624
616
`gnuplot-mode' buffer. You will see the change the next time you
625
617
create a `gnuplot-mode' buffer."
626
- :group 'gnuplot-insertions
627
618
:type '(list (string :tag " Title" )
628
619
(repeat :inline t
629
620
(vector (string :tag " Name" )
@@ -644,7 +635,6 @@ See the document string for `gnuplot--insertions-menu'
644
635
Changing this will not effect a change in any currently existing
645
636
`gnuplot-mode' buffer. You will see the change the next time you
646
637
create a `gnuplot-mode' buffer."
647
- :group 'gnuplot-insertions
648
638
:type '(list (string :tag " Title" )
649
639
(repeat :inline t
650
640
(vector (string :tag " Name" )
@@ -664,7 +654,6 @@ See the document string for `gnuplot--insertions-menu'
664
654
Changing this will not effect a change in any currently existing
665
655
`gnuplot-mode' buffer. You will see the change the next time you
666
656
create a `gnuplot-mode' buffer."
667
- :group 'gnuplot-insertions
668
657
:type '(list (string :tag " Title" )
669
658
(repeat :inline t
670
659
(vector (string :tag " Name" )
@@ -681,7 +670,6 @@ See the document string for `gnuplot--insertions-menu'
681
670
Changing this will not effect a change in any currently existing
682
671
`gnuplot-mode' buffer. You will see the change the next time you
683
672
create a `gnuplot-mode' buffer."
684
- :group 'gnuplot-insertions
685
673
:type '(list (string :tag " Title" )
686
674
(repeat :inline t
687
675
(vector (string :tag " Name" )
@@ -703,7 +691,6 @@ See the document string for `gnuplot--insertions-menu'
703
691
Changing this will not effect a change in any currently existing
704
692
`gnuplot-mode' buffer. You will see the change the next time you
705
693
create a `gnuplot-mode' buffer."
706
- :group 'gnuplot-insertions
707
694
:type '(list (string :tag " Title" )
708
695
(repeat :inline t
709
696
(vector (string :tag " Name" )
@@ -756,6 +743,7 @@ opening an argument-setting popup.")
756
743
757
744
; ;; --- syntax colorization, syntax table
758
745
746
+ (defvar gnuplot-mode-abbrev-table )
759
747
(defvar gnuplot-mode-syntax-table
760
748
(let ((table (make-syntax-table )))
761
749
(modify-syntax-entry ?* " ." table)
0 commit comments