emacs: add documentation for defuns

emacs/auto/-macro.el

@@ -1,13 +1,16 @@
 (defun agw-touch (fname)
+  "Touches a file asynchronously."
   (interactive "FFile to touch: ")
   (start-process "agw-touch" nil "touch" (expand-file-name fname)))
 
 (defun agw-lisp-mode ()
+  "Sets up lisp and other functional language major modes."
   (setq-local indent-tabs-mode nil)
   (setq-local standard-indent  2)
   (setq-local tab-width        2))
 
 (defun agw-org-mode ()
+  "Sets up `org-mode'."
   (variable-pitch-mode)
   (org-bullets-mode)
   (flyspell-mode)
@@ -16,6 +19,7 @@
   (setq-local tab-width        2))
 
 (defun agw-dired-mode ()
+  "Sets up `dired-mode'."
   (local-set-key (kbd "C-c t") #'agw-touch))
 
 (add-hook 'org-mode-hook #'agw-org-mode)