aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/desktop.el2
-rw-r--r--lisp/kermit.el8
-rw-r--r--lisp/obsolete/cc-compat.el14
-rw-r--r--lisp/progmodes/dcl-mode.el2
4 files changed, 16 insertions, 10 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el
index 33d7643d1b7..59610a128a3 100644
--- a/lisp/desktop.el
+++ b/lisp/desktop.el
@@ -616,7 +616,7 @@ DIRNAME omitted or nil means use `desktop-dirname'."
616";; -------------------------------------------------------------------------- 616";; --------------------------------------------------------------------------
617;; Desktop File for Emacs 617;; Desktop File for Emacs
618;; -------------------------------------------------------------------------- 618;; --------------------------------------------------------------------------
619" "*Header to place in Desktop file.") 619" "Header to place in Desktop file.")
620 620
621(defvar desktop-delay-hook nil 621(defvar desktop-delay-hook nil
622 "Hooks run after all buffers are loaded; intended for internal use.") 622 "Hooks run after all buffers are loaded; intended for internal use.")
diff --git a/lisp/kermit.el b/lisp/kermit.el
index f6ed1fbda1c..ec5d91749c4 100644
--- a/lisp/kermit.el
+++ b/lisp/kermit.el
@@ -77,7 +77,13 @@
77 77
78(require 'shell) 78(require 'shell)
79 79
80(defvar kermit-esc-char "\C-\\" "*Kermit's escape char.") 80(defgroup kermit nil
81 "Kermit support."
82 :group 'comm)
83
84(defcustom kermit-esc-char "\C-\\"
85 "Kermit's escape char."
86 :type 'string)
81 87
82(defun kermit-esc () 88(defun kermit-esc ()
83 "For sending escape sequences to a kermit running in shell mode." 89 "For sending escape sequences to a kermit running in shell mode."
diff --git a/lisp/obsolete/cc-compat.el b/lisp/obsolete/cc-compat.el
index bbacd121135..8e9d9e72625 100644
--- a/lisp/obsolete/cc-compat.el
+++ b/lisp/obsolete/cc-compat.el
@@ -59,21 +59,21 @@
59 59
60;; In case c-mode.el isn't loaded 60;; In case c-mode.el isn't loaded
61(defvar c-indent-level 2 61(defvar c-indent-level 2
62 "*Indentation of C statements with respect to containing block.") 62 "Indentation of C statements with respect to containing block.")
63;;;###autoload(put 'c-indent-level 'safe-local-variable 'integerp) 63;;;###autoload(put 'c-indent-level 'safe-local-variable 'integerp)
64 64
65(defvar c-brace-imaginary-offset 0 65(defvar c-brace-imaginary-offset 0
66 "*Imagined indentation of a C open brace that actually follows a statement.") 66 "Imagined indentation of a C open brace that actually follows a statement.")
67(defvar c-brace-offset 0 67(defvar c-brace-offset 0
68 "*Extra indentation for braces, compared with other text in same context.") 68 "Extra indentation for braces, compared with other text in same context.")
69(defvar c-argdecl-indent 5 69(defvar c-argdecl-indent 5
70 "*Indentation level of declarations of C function arguments.") 70 "Indentation level of declarations of C function arguments.")
71(defvar c-label-offset -2 71(defvar c-label-offset -2
72 "*Offset of C label lines and case statements relative to usual indentation.") 72 "Offset of C label lines and case statements relative to usual indentation.")
73(defvar c-continued-statement-offset 2 73(defvar c-continued-statement-offset 2
74 "*Extra indent for lines not starting new statements.") 74 "Extra indent for lines not starting new statements.")
75(defvar c-continued-brace-offset 0 75(defvar c-continued-brace-offset 0
76 "*Extra indent for substatements that start with open-braces. 76 "Extra indent for substatements that start with open-braces.
77This is in addition to c-continued-statement-offset.") 77This is in addition to c-continued-statement-offset.")
78 78
79 79
diff --git a/lisp/progmodes/dcl-mode.el b/lisp/progmodes/dcl-mode.el
index d5803c77bb4..864074fe191 100644
--- a/lisp/progmodes/dcl-mode.el
+++ b/lisp/progmodes/dcl-mode.el
@@ -459,7 +459,7 @@ Preloaded with all known option names from dcl-option-alist")
459; ("GOSUB" (, (concat dcl-cmd-r 459; ("GOSUB" (, (concat dcl-cmd-r
460; "GOSUB[ \t]+\\([A-Za-z0-9_$]+\\)")) 5) 460; "GOSUB[ \t]+\\([A-Za-z0-9_$]+\\)")) 5)
461; ("CALL" (, (concat dcl-cmd-r "CALL[ \t]+\\([A-Za-z0-9_$]+\\)")) 5))) 461; ("CALL" (, (concat dcl-cmd-r "CALL[ \t]+\\([A-Za-z0-9_$]+\\)")) 5)))
462; "*Default imenu generic expression for DCL. 462; "Default imenu generic expression for DCL.
463 463
464;The default includes SUBROUTINE labels in the main listing and 464;The default includes SUBROUTINE labels in the main listing and
465;sub-listings for other labels, CALL, GOTO and GOSUB statements. 465;sub-listings for other labels, CALL, GOTO and GOSUB statements.