(shadow-parse-fullname): Renamed from shadow-parse-fullpath.

[gnu-emacs] / lisp / newcomment.el

diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index e108264903c69fe2c8c75efe6faf1f011359c3bb..74d255fabf026cd6b1000c203b678a8862c348d9 100644 (file)
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -473,6 +473,10 @@ If CONTINUE is non-nil, use the `comment-continue' markers if any."
            ;; are in column 0, so we first go to the likely target column.
            (indent-to comment-column)
            (setq begpos (point))
+           ;; Ensure there's a space before the comment for things
+           ;; like sh where it matters (as well as being neater).
+           (unless (eq ?\  (char-syntax (char-before)))
+             (insert ?\ ))
            (insert starter)
            (setq cpos (point-marker))
            (insert ender)))