6 files changed, 14 insertions, 14 deletions

diff --git a/lisp/eshell/em-dirs.el b/lisp/eshell/em-dirs.el
index 1bd7fbcb90f..3960cd7b229 100644
--- a/lisp/eshell/em-dirs.el
+++ b/lisp/eshell/em-dirs.el
@@ -301,7 +301,7 @@ Thus, this does not include the current directory.")
                  eshell-user-names)))))))
 
 (defun eshell/pwd (&rest args)
-  "Change output from ‘pwd’ to be cleaner."
+  "Change output from `pwd' to be cleaner."
   (let* ((path default-directory)
          (len (length path)))
     (if (and (> len 1)
@@ -365,7 +365,7 @@ in the minibuffer:
       (let ((curdir (eshell/pwd)))
         (if (string-match path curdir)
             (setq path (replace-match subpath nil nil curdir))
-          (error "Path substring ‘%s’ not found" path))))
+          (error "Path substring `%s' not found" path))))
      ((and path (string-match "^-\\([0-9]*\\)$" path))
       (let ((index (match-string 1 path)))
         (setq path
diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el
index 976882c14e2..f2e67cc8c32 100644
--- a/lisp/eshell/em-glob.el
+++ b/lisp/eshell/em-glob.el
@@ -193,7 +193,7 @@ The basic syntax is:
   *      .*      matches any group of characters (or none)
   #      *       matches zero or more occurrences of preceding
   ##     +       matches one or more occurrences of preceding
-  (x)    \(x\)   makes ‘x’ a regular expression group
+  (x)    \(x\)   makes `x' a regular expression group
   |      \|      boolean OR within an expression group
   [a-b]  [a-b]   matches a character or range
   [^a]   [^a]    excludes a character or range
@@ -220,7 +220,7 @@ resulting regular expression."
                   matched-in-pattern (1+ op-begin))
           (let ((xlat (assq op-char eshell-glob-translate-alist)))
             (if (not xlat)
-                (error "Unrecognized globbing character ‘%c’" op-char)
+                (error "Unrecognized globbing character `%c'" op-char)
               (if (stringp (cdr xlat))
                   (setq regexp (concat regexp (cdr xlat))
                         matched-in-pattern (1+ op-begin))
@@ -289,7 +289,7 @@ the form:
                    glob (car globs)
                    len (length glob)))))
     (if (and recurse-p (not glob))
-        (error "‘**’ cannot end a globbing pattern"))
+        (error "`**' cannot end a globbing pattern"))
     (let ((index 1))
       (setq incl glob)
       (while (and (eq incl glob)
diff --git a/lisp/eshell/em-pred.el b/lisp/eshell/em-pred.el
index 9b67175ea63..102795fc16b 100644
--- a/lisp/eshell/em-pred.el
+++ b/lisp/eshell/em-pred.el
@@ -193,7 +193,7 @@ EXAMPLES:
   ***/*~f*(-/)  recursively (though not traversing symlinks),
                 find all directories (or symlinks referring to
                 directories) whose names do not begin with f.
-  e*(*Lk+50)    executables 50k or larger beginning with ‘e’")
+  e*(*Lk+50)    executables 50k or larger beginning with `e'")
 
 (defvar eshell-modifier-help-string
   "Eshell modifier quick reference:
@@ -318,7 +318,7 @@ resultant list of strings."
                     (if (and func (functionp func))
                         (setq preds (eshell-add-pred-func func preds
                                                           negate follow))
-                      (error "Invalid function predicate ‘%s’"
+                      (error "Invalid function predicate `%s'"
                              (eshell-stringify func))))
                 (error "Invalid function predicate")))
              ((eq char ?^)
@@ -336,20 +336,20 @@ resultant list of strings."
                               (cons `(lambda (lst)
                                        (mapcar (function ,func) lst))
                                     mods))
-                      (error "Invalid function modifier ‘%s’"
+                      (error "Invalid function modifier `%s'"
                              (eshell-stringify func))))
                 (error "Invalid function modifier")))
              ((eq char ?:)
               (forward-char)
               (let ((mod (assq (char-after) eshell-modifier-alist)))
                 (if (not mod)
-                    (error "Unknown modifier character ‘%c’" (char-after))
+                    (error "Unknown modifier character `%c'" (char-after))
                   (forward-char)
                   (setq mods (cons (eval (cdr mod)) mods)))))
              (t
               (let ((pred (assq char eshell-predicate-alist)))
                 (if (not pred)
-                    (error "Unknown predicate character ‘%c’" char)
+                    (error "Unknown predicate character `%c'" char)
                   (forward-char)
                   (setq preds
                         (eshell-add-pred-func (eval (cdr pred)) preds
diff --git a/lisp/eshell/em-script.el b/lisp/eshell/em-script.el
index 8e65e440417..1a16e5e7a0f 100644
--- a/lisp/eshell/em-script.el
+++ b/lisp/eshell/em-script.el
@@ -45,7 +45,7 @@ commands, as a script file."
 (defcustom eshell-login-script (expand-file-name "login" eshell-directory-name)
   "If non-nil, a file to invoke when starting up Eshell interactively.
 This file should be a file containing Eshell commands, where comment
-lines begin with ‘#’."
+lines begin with `#'."
   :type 'file
   :group 'eshell-script)
 
@@ -89,7 +89,7 @@ This includes when running `eshell-command'."
 
 (defun eshell-source-file (file &optional args subcommand-p)
   "Execute a series of Eshell commands in FILE, passing ARGS.
-Comments begin with ‘#’."
+Comments begin with `#'."
   (interactive "f")
   (let ((orig (point))
         (here (point-max))
diff --git a/lisp/eshell/esh-opt.el b/lisp/eshell/esh-opt.el
index 4d28208b234..96d485beca1 100644
--- a/lisp/eshell/esh-opt.el
+++ b/lisp/eshell/esh-opt.el
@@ -180,7 +180,7 @@ This code doesn't really need to be macro expanded everywhere."
                 (concat usage
                         (format-message "
 This command is implemented in Lisp.  If an unrecognized option is
-passed to this command, the external version ‘%s’
+passed to this command, the external version `%s'
 will be called instead." extcmd)))))
     (throw 'eshell-usage usage)))
 
diff --git a/lisp/eshell/esh-var.el b/lisp/eshell/esh-var.el
index f5110c38475..0d94186cb9a 100644
--- a/lisp/eshell/esh-var.el
+++ b/lisp/eshell/esh-var.el
@@ -116,7 +116,7 @@
 (require 'ring)
 
 (defgroup eshell-var nil
-  "Variable interpolation is introduced whenever the ‘$’ character
+  "Variable interpolation is introduced whenever the `$' character
 appears unquoted in any argument (except when that argument is
 surrounded by single quotes).  It may be used to interpolate a
 variable value, a subcommand, or even the result of a Lisp form."