Fix some quoting glitches in doc strings

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