Fix footer line and add Code section header

diff --git a/ztree-diff-model.el b/ztree-diff-model.el
index 8f7fc152f6a185e1758841207a9c6a729ab50b33..c915d90f111dcdc1d261c5a3ca2befa9867ca42c 100644 (file)
--- a/ztree-diff-model.el
+++ b/ztree-diff-model.el
@@ -28,6 +28,7 @@
 
 ;; Diff model
 
+;;; Code:
 (require 'ztree-util)
 
 (defvar ztree-diff-model-wait-message nil
@@ -310,3 +311,5 @@ the rest is the combined list of nodes"
 
 
 (provide 'ztree-diff-model)
+
+;;; ztree-diff-model.el ends here

diff --git a/ztree-diff.el b/ztree-diff.el
index 8a6f9ae397505a1ef5a1f79567a71740d3aa71e5..f23a4b5927d5395aeb6640997a1709e860e9471c 100644 (file)
--- a/ztree-diff.el
+++ b/ztree-diff.el
@@ -26,6 +26,7 @@
 ;;
 ;;; Commentary:
 
+;;; Code:
 (require 'ztree-view)
 (require 'ztree-diff-model)
 

diff --git a/ztree-util.el b/ztree-util.el
index d3b9bdbe9d3d1050b114ba2672dbe92435e764af..0fbdadcd8085fe5dbfa382690009be513d31f6b2 100644 (file)
--- a/ztree-util.el
+++ b/ztree-util.el
@@ -26,6 +26,7 @@
 ;;
 ;;; Commentary:
 
+;;; Code:
 (defun ztree-find (where which)
   "find element of the list `where` matching predicate `which`"
   (catch 'found
@@ -120,3 +121,5 @@ will be expanded to the following functions:
 
 
 (provide 'ztree-util)
+
+;;; ztree-util.el ends here

diff --git a/ztree-view.el b/ztree-view.el
index fecc928cbe03fcfb5645989b91ba73aac0ff2493..e2a460e8060a634e51612ea5edb83826e4ec2d68 100644 (file)
--- a/ztree-view.el
+++ b/ztree-view.el
@@ -548,4 +548,4 @@ list of leafs"
 
 
 (provide 'ztree-view)
-;;; ztree.el ends here
+;;; ztree-view.el ends here