From 989171268461a0069ecd53a49e6098ce08638102 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Fri, 5 May 2023 09:58:21 -0500
Subject: changes

---
 lisp/acdw.el | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'lisp/acdw.el')

diff --git a/lisp/acdw.el b/lisp/acdw.el
index 63291d3..b76b947 100644
--- a/lisp/acdw.el
+++ b/lisp/acdw.el
@@ -59,6 +59,13 @@ enables passing arguments to a calling function."
                        ("—" "---"))))
         (replace-match replace nil nil)))))
 
+(defun unsmartify-dwim ()
+  "Unsmartify the current region or the entire buffer."
+  (interactive)
+  (if (region-active-p)
+      (unsmartify-region (region-beginning) (region-end))
+    (unsmartify-region (point-min) (point-max))))
+
 (defun ++concat (func strings)
   "Concat STRINGS processed by FUNC.
 Each of STRINGS can be a bare string or a list.  Strings are
-- 
cgit 1.4.1-21-gabe81