From 9a48d3bd8b7b03b27a40416ca506fbcc5570b180 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 4 Jan 2022 00:41:00 -0600 Subject: Add +remember-prefix-arg function --- lisp/acdw.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/acdw.el b/lisp/acdw.el index 43cb5c7..a4e12f1 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el @@ -83,5 +83,11 @@ If Emacs is already started, run FUNCTION. Otherwise, add it to (funcall function) (add-hook 'after-init-hook function))) +(defun +remember-prefix-arg (p-arg P-arg) + "Display prefix ARG, in \"p\" and \"P\" `interactive' types. +I keep forgetting how they differ." + (interactive "p\nP") + (message "p: %S P: %S" p-arg P-arg)) + (provide 'acdw) ;;; acdw.el ends here -- cgit 1.4.1-21-gabe81