summaryrefslogtreecommitdiff
path: root/elpa/req-package-20180605.1141/req-package-hooks.el
diff options
context:
space:
mode:
Diffstat (limited to 'elpa/req-package-20180605.1141/req-package-hooks.el')
-rw-r--r--elpa/req-package-20180605.1141/req-package-hooks.el26
1 files changed, 0 insertions, 26 deletions
diff --git a/elpa/req-package-20180605.1141/req-package-hooks.el b/elpa/req-package-20180605.1141/req-package-hooks.el
deleted file mode 100644
index b12d2c3..0000000
--- a/elpa/req-package-20180605.1141/req-package-hooks.el
+++ /dev/null
@@ -1,26 +0,0 @@
-;;; req-package-hooks.el --- summary:
-;;; commentary:
-;;; code:
-
-(defun req-package-hooks-mode-loaded-p (mode)
- "Return true if MODE is loaded now."
- (or (assoc mode minor-mode-list) (equal major-mode mode)))
-
-(defun req-package-hooks-add-execute-impl (m h f)
- "Add function F to hook H and execute it if mode M is already activated"
- (add-hook h f)
- (if (req-package-hooks-mode-loaded-p m)
- (funcall f)))
-
-(defun req-package-hooks-add-execute (m f)
- "Add function F to mode M and execute it if already activated"
- (let ((h (intern (concat (symbol-name m) "-hook"))))
- (req-package-hooks-add-execute-impl m h f)))
-
-(defun add-hook-exec (m f &optional ff)
- (if ff
- (req-package-hooks-add-execute-impl m f ff)
- (req-package-hooks-add-execute m f)))
-
-(provide 'req-package-hooks)
-;;; req-package-hooks ends here