diff options
Diffstat (limited to 'lisp/cedet/srecode')
-rw-r--r-- | lisp/cedet/srecode/dictionary.el | 2 | ||||
-rw-r--r-- | lisp/cedet/srecode/document.el | 4 | ||||
-rw-r--r-- | lisp/cedet/srecode/insert.el | 4 | ||||
-rw-r--r-- | lisp/cedet/srecode/semantic.el | 8 |
4 files changed, 9 insertions, 9 deletions
diff --git a/lisp/cedet/srecode/dictionary.el b/lisp/cedet/srecode/dictionary.el index a0205177caa..de6f21be094 100644 --- a/lisp/cedet/srecode/dictionary.el +++ b/lisp/cedet/srecode/dictionary.el @@ -560,7 +560,7 @@ where ENTRY_N = (NAME ENTRY_N_1 ENTRY_N_2 ...) | TAG -where TAG is a semantic tag of class 'variable. The (NAME ... ) +where TAG is a semantic tag of class `variable'. The (NAME ... ) form creates a child dictionary which is stored under the name NAME. The TAG form creates a value entry or section dictionary entry whose name is the name of the tag. diff --git a/lisp/cedet/srecode/document.el b/lisp/cedet/srecode/document.el index ad15b3ef6fd..21acc61fef2 100644 --- a/lisp/cedet/srecode/document.el +++ b/lisp/cedet/srecode/document.el @@ -385,7 +385,7 @@ It is assumed that the comment occurs just in front of FCN-IN." (when (or (not fcn-in) (not (semantic-tag-of-class-p fcn-in 'function))) - (error "No tag of class 'function to insert comment for")) + (error "No tag of class `function' to insert comment for")) (if (not (eq (current-buffer) (semantic-tag-buffer fcn-in))) (error "Only insert comments for tags in the current buffer")) @@ -496,7 +496,7 @@ It is assumed that the comment occurs just after VAR-IN." (when (or (not var-in) (not (semantic-tag-of-class-p var-in 'variable))) - (error "No tag of class 'variable to insert comment for")) + (error "No tag of class `variable' to insert comment for")) (if (not (eq (current-buffer) (semantic-tag-buffer var-in))) (error "Only insert comments for tags in the current buffer")) diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el index 4e25e1f5ca0..455977bbe03 100644 --- a/lisp/cedet/srecode/insert.el +++ b/lisp/cedet/srecode/insert.el @@ -373,8 +373,8 @@ Can't be blank, or it might be used by regular variable insertion.") :initarg :where :documentation "This should be `begin' or `end', indicating where to insert a CR. -When `begin', insert a CR if not at 'bol'. -When `end', insert a CR if not at 'eol'.") +When `begin', insert a CR if not at `bol'. +When `end', insert a CR if not at `eol'.") ;; @TODO - Add slot and control for the number of blank ;; lines before and after point. ) diff --git a/lisp/cedet/srecode/semantic.el b/lisp/cedet/srecode/semantic.el index 344b908da32..5195016e22a 100644 --- a/lisp/cedet/srecode/semantic.el +++ b/lisp/cedet/srecode/semantic.el @@ -210,7 +210,7 @@ variable default values, and other things." ;;; :tagtype ARGUMENT HANDLING ;; ;; When a :tagtype argument is required, identify the current tag, of -;; cf class 'type. Apply those parameters to the dictionary. +;; class 'type'. Apply those parameters to the dictionary. (defun srecode-semantic-handle-:tagtype (dict) "Add macros into the dictionary DICT based on a tag of class type at point. @@ -218,7 +218,7 @@ Assumes the cursor is in a tag of class type. If not, throw an error." (let ((typetag (or srecode-semantic-selected-tag (semantic-current-tag-of-class 'type)))) (when (not typetag) - (error "Cursor is not in a TAG of class 'type")) + (error "Cursor is not in a TAG of class `type'")) (srecode-semantic-apply-tag-to-dict typetag dict))) @@ -285,8 +285,8 @@ CTXT is the pre-calculated context." "Insert TAG into a buffer using srecode templates at point. Optional STYLE-OPTION is a list of minor configuration of styles, -such as the symbol 'prototype for prototype functions, or -'system for system includes, and 'doxygen, for a doxygen style +such as the symbol `prototype' for prototype functions, or +`system' for system includes, and `doxygen', for a doxygen style comment. Optional third argument POINT-INSERT-FCN is a hook that is run after |