From 71c4d378134353d8f9e2e08571b9f1b9e96f5c06 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Wed, 2 Jun 2021 23:38:37 -0500
Subject: Remove commented block

---
 lisp/acdw.el | 12 ------------
 1 file changed, 12 deletions(-)

(limited to 'lisp/acdw.el')

diff --git a/lisp/acdw.el b/lisp/acdw.el
index f227c94..d048fc0 100644
--- a/lisp/acdw.el
+++ b/lisp/acdw.el
@@ -66,18 +66,6 @@ ARG).  When called with multiple arguments or a list, it returns
         file
       nil)))
 
-;; (defmacro hook-defun (name hooks &rest forms)
-;;   "Define a function NAME that executes FORMS, and add it to
-;; each hook in HOOKS."
-;;   (declare (indent 2))
-;;   (let ((func-name (intern (concat "hook-defun-" (symbol-name name))))
-;;         (hook-list (if (consp hooks) hooks (list hooks)))
-;;         (hook-defun-add-hook-list))
-;;     `(progn
-;;        (defun ,func-name () "Defined by `hook-defun'." ,@forms)
-;;        ,@(dolist (hook hook-list hook-defun-add-hook-list)
-;;            (push `(add-hook ',hook #',func-name) hook-defun-add-hook-list)))))
-
 (defun kill-region-or-backward-word (arg)
   "Kill region if active, or backward word if not."
   (interactive "p")
-- 
cgit 1.4.1-21-gabe81