Comment (header format fix).

diff --git a/lisp/eshell/esh-ext.el b/lisp/eshell/esh-ext.el
index 70dfa719c9d59db29acd452b654ee0e8547dfc2a..719bb308a6cbda4af9105d3599fca4e3c4e9ce99 100644 (file)
--- a/lisp/eshell/esh-ext.el
+++ b/lisp/eshell/esh-ext.el
@@ -30,6 +30,8 @@
 ;;   /bin/grep   ; will definitely invoke /bin/grep
 ;;   *grep        ; will also invoke /bin/grep
 
+;;; Code:
+
 (provide 'esh-ext)
 
 (eval-when-compile
@@ -315,7 +317,5 @@ line of the form #!<interp>."
                            (cdr interp)))))
          (or interp (list fullname)))))))
 
-;;; Code:
-
 ;; arch-tag: 178d4064-7e60-4745-b81f-bab5d8d7c40f
 ;;; esh-ext.el ends here

diff --git a/lisp/eshell/esh-io.el b/lisp/eshell/esh-io.el
index 7d4a41bb2efd765db3ddd410305911543638d116..a9b7225a3edde400ab36b05fb571ce858b0ace8f 100644 (file)
--- a/lisp/eshell/esh-io.el
+++ b/lisp/eshell/esh-io.el
@@ -55,6 +55,8 @@
 ;;   (+ 1 2) > a > b > c   ; prints number to all three files
 ;;   (+ 1 2) > a | wc      ; prints to 'a', and pipes to 'wc'
 
+;;; Code:
+
 (provide 'esh-io)
 
 (eval-when-compile
@@ -513,7 +515,5 @@ Returns what was actually sent, or nil if nothing was sent."
        (eshell-output-object-to-target object (car target))
        (setq target (cdr target))))))
 
-;;; Code:
-
 ;; arch-tag: 9ca2080f-d5e0-4b26-aa0b-d59194a905a2
 ;;; esh-io.el ends here

diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el
index db876d49bf845591c9d87b83fd8a3b0acd665653..bdb5fd3179cd48942df40db46b562625a8a18f2f 100644 (file)
--- a/lisp/eshell/esh-mode.el
+++ b/lisp/eshell/esh-mode.el
@@ -57,6 +57,8 @@
 ;;
 ;; @ <C-c C-b> will move backward a complete shell argument.
 
+;;; Code:
+
 (provide 'esh-mode)
 
 (eval-when-compile (require 'esh-util))
@@ -1080,7 +1082,5 @@ This function could be in the list `eshell-output-filter-functions'."
 (custom-add-option 'eshell-output-filter-functions
                   'eshell-handle-ansi-color)
 
-;;; Code:
-
 ;; arch-tag: ec65bc2b-da14-4547-81d3-a32af3a4dc57
 ;;; esh-mode.el ends here

diff --git a/lisp/eshell/esh-opt.el b/lisp/eshell/esh-opt.el
index 2bb5e35213530e17e769982892c8b8b0fed71f12..2ffb09165f4b8b893122b8a100e6cf27976f2a02 100644 (file)
--- a/lisp/eshell/esh-opt.el
+++ b/lisp/eshell/esh-opt.el
@@ -22,6 +22,8 @@
 
 ;;; Commentary:
 
+;;; Code:
+
 (provide 'esh-opt)
 
 (eval-when-compile (require 'esh-ext))
@@ -222,7 +224,5 @@ This assumes that symbols have been intern'd by `eshell-with-options'."
                (setq index (1+ index)))))))))
   args)
 
-;;; Code:
-
 ;; arch-tag: 45c6c2d0-8091-46a1-a205-2f4bafd8230c
 ;;; esh-opt.el ends here

diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el
index 54689516fba1690be8bb7e9604f25200eedd89b8..0aa7d44190ceed5434a9b37a9681a61c4477d698 100644 (file)
--- a/lisp/eshell/esh-proc.el
+++ b/lisp/eshell/esh-proc.el
@@ -22,6 +22,8 @@
 
 ;;; Commentary:
 
+;;; Code:
+
 (provide 'esh-proc)
 
 (eval-when-compile
@@ -524,7 +526,5 @@ See the variable `eshell-kill-processes-on-exit'."
   (eshell-send-input nil nil t)
   (eshell-process-interact 'process-send-eof))
 
-;;; Code:
-
 ;; arch-tag: ac477a3e-ee4d-4b44-8ec6-212010e607bb
 ;;; esh-proc.el ends here

diff --git a/lisp/eshell/esh-var.el b/lisp/eshell/esh-var.el
index 4e3fda73afbc1c13a6c49f2052e6f1470a00f684..22aa0ca4a64a074430457f907af926e079994fbd 100644 (file)
--- a/lisp/eshell/esh-var.el
+++ b/lisp/eshell/esh-var.el
@@ -104,6 +104,8 @@
 ;; contains the exit code of the last command (0 or 1 for Lisp
 ;; functions, based on successful completion).
 
+;;; Code:
+
 (provide 'esh-var)
 
 (eval-when-compile
@@ -651,7 +653,5 @@ For example, to retrieve the second element of a user's record in
       (setq pcomplete-stub (substring arg pos))
       (throw 'pcomplete-completions (pcomplete-entries)))))
 
-;;; Code:
-
 ;; arch-tag: 393654fe-bdad-4f27-9a10-b1472ded14cf
 ;;; esh-var.el ends here