aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet/srecode
diff options
context:
space:
mode:
authorJoakim Verona2011-12-28 11:34:15 +0100
committerJoakim Verona2011-12-28 11:34:15 +0100
commit2f74c36bf173b5ad01f99e0d1b31b9b8fa5c8f2f (patch)
tree034e65ef002631d0aba8fc1a41e9984fc557e630 /lisp/cedet/srecode
parentbb29f044aa967831cd664c54eba0de0c701436ce (diff)
parentd23ab8e8726ecb7e3554644857b4a58e5f7408f1 (diff)
downloademacs-2f74c36bf173b5ad01f99e0d1b31b9b8fa5c8f2f.tar.gz
emacs-2f74c36bf173b5ad01f99e0d1b31b9b8fa5c8f2f.zip
upstream
Diffstat (limited to 'lisp/cedet/srecode')
-rw-r--r--lisp/cedet/srecode/args.el3
-rw-r--r--lisp/cedet/srecode/fields.el2
-rw-r--r--lisp/cedet/srecode/insert.el2
-rw-r--r--lisp/cedet/srecode/srt-mode.el2
4 files changed, 4 insertions, 5 deletions
diff --git a/lisp/cedet/srecode/args.el b/lisp/cedet/srecode/args.el
index d8e02f978b2..73445fbf13d 100644
--- a/lisp/cedet/srecode/args.el
+++ b/lisp/cedet/srecode/args.el
@@ -32,7 +32,7 @@
32;;; :blank 32;;; :blank
33;; 33;;
34;; Using :blank means that the template should force blank lines 34;; Using :blank means that the template should force blank lines
35;; before and after the template, reguardless of where the insertion 35;; before and after the template, regardless of where the insertion
36;; is occurring. 36;; is occurring.
37(defun srecode-semantic-handle-:blank (dict) 37(defun srecode-semantic-handle-:blank (dict)
38 "Add macros into the dictionary DICT specifying blank line spacing. 38 "Add macros into the dictionary DICT specifying blank line spacing.
@@ -185,4 +185,3 @@ do not contain any text from preceding or following text."
185(provide 'srecode/args) 185(provide 'srecode/args)
186 186
187;;; srecode/args.el ends here 187;;; srecode/args.el ends here
188
diff --git a/lisp/cedet/srecode/fields.el b/lisp/cedet/srecode/fields.el
index f13fb17ca8f..f4d34a0f2ab 100644
--- a/lisp/cedet/srecode/fields.el
+++ b/lisp/cedet/srecode/fields.el
@@ -324,7 +324,7 @@ Try to use this to provide useful completion when available.")
324 ) 324 )
325 325
326(defvar srecode-field-replication-max-size 100 326(defvar srecode-field-replication-max-size 100
327 "Maximum size of a field before cancelling replication.") 327 "Maximum size of a field before canceling replication.")
328 328
329(defun srecode-field-mod-hook (ol after start end &optional pre-len) 329(defun srecode-field-mod-hook (ol after start end &optional pre-len)
330 "Modification hook for the field overlay. 330 "Modification hook for the field overlay.
diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el
index 60f277b2c9f..bbf8b881c4d 100644
--- a/lisp/cedet/srecode/insert.el
+++ b/lisp/cedet/srecode/insert.el
@@ -312,7 +312,7 @@ occur in your template.")
312 (setq doit nil))) 312 (setq doit nil)))
313 (goto-char pm) 313 (goto-char pm)
314 ) 314 )
315 ;; Do indentation reguardless of the newline. 315 ;; Do indentation regardless of the newline.
316 (when (and (eq i t) inbuff) 316 (when (and (eq i t) inbuff)
317 (indent-according-to-mode) 317 (indent-according-to-mode)
318 (goto-char pm)) 318 (goto-char pm))
diff --git a/lisp/cedet/srecode/srt-mode.el b/lisp/cedet/srecode/srt-mode.el
index 0a99b7869e8..ed2b0e2cfdb 100644
--- a/lisp/cedet/srecode/srt-mode.el
+++ b/lisp/cedet/srecode/srt-mode.el
@@ -194,7 +194,7 @@ we can tell font lock about them.")
194 '(srecode-font-lock-keywords 194 '(srecode-font-lock-keywords
195 nil ;; perform string/comment fontification 195 nil ;; perform string/comment fontification
196 nil ;; keywords are case sensitive. 196 nil ;; keywords are case sensitive.
197 ;; This puts _ & - as a word constituant, 197 ;; This puts _ & - as a word constituent,
198 ;; simplifying our keywords significantly 198 ;; simplifying our keywords significantly
199 ((?_ . "w") (?- . "w"))))) 199 ((?_ . "w") (?- . "w")))))
200 200