[Emacs-diffs] Changes to emacs/lisp/files.el,v

[Werner LEMBERG]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Werner LEMBERG <wl>     07/11/16 08:03:45

Index: files.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/files.el,v
retrieving revision 1.940
retrieving revision 1.941
diff -u -b -r1.940 -r1.941
--- files.el    10 Nov 2007 17:20:37 -0000      1.940
+++ files.el    16 Nov 2007 08:03:45 -0000      1.941
@@ -2428,7 +2428,11 @@
                             ;; put them in the first line of
                             ;; such a file without screwing up
                             ;; the interpreter invocation.
-                            (and (looking-at "^#!") 2)) t)
+                            ;; The same holds for
+                            ;;   '\"
+                            ;; in man pages (preprocessor
+                            ;; magic for the `man' program).
+                            (and (looking-at "^\\(#!\\|'\\\\\"\\)") 2)) t)
      (progn
        (skip-chars-forward " \t")
        (setq beg (point))