1 files changed, 6 insertions, 0 deletions
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

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
83	(funcall function)	83	(funcall function)
84	(add-hook 'after-init-hook function)))	84	(add-hook 'after-init-hook function)))
85		85
		86	(defun +remember-prefix-arg (p-arg P-arg)
		87	"Display prefix ARG, in \"p\" and \"P\" `interactive' types.
		88	I keep forgetting how they differ."
		89	(interactive "p\nP")
		90	(message "p: %S P: %S" p-arg P-arg))
		91
86	(provide 'acdw)	92	(provide 'acdw)
87	;;; acdw.el ends here	93	;;; acdw.el ends here