diff options
| author | Case Duckworth | 2023-05-05 09:58:21 -0500 |
|---|---|---|
| committer | Case Duckworth | 2023-05-05 09:58:21 -0500 |
| commit | 989171268461a0069ecd53a49e6098ce08638102 (patch) | |
| tree | b88889d371152458f674c0a608222bf1192f3980 /lisp/acdw.el | |
| parent | remove bad fiels (diff) | |
| download | emacs-use-package.tar.gz emacs-use-package.zip | |
changes use-package
Diffstat (limited to 'lisp/acdw.el')
| -rw-r--r-- | lisp/acdw.el | 7 |
1 files changed, 7 insertions, 0 deletions
| 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." | |||
| 59 | ("—" "---")))) | 59 | ("—" "---")))) |
| 60 | (replace-match replace nil nil))))) | 60 | (replace-match replace nil nil))))) |
| 61 | 61 | ||
| 62 | (defun unsmartify-dwim () | ||
| 63 | "Unsmartify the current region or the entire buffer." | ||
| 64 | (interactive) | ||
| 65 | (if (region-active-p) | ||
| 66 | (unsmartify-region (region-beginning) (region-end)) | ||
| 67 | (unsmartify-region (point-min) (point-max)))) | ||
| 68 | |||
| 62 | (defun ++concat (func strings) | 69 | (defun ++concat (func strings) |
| 63 | "Concat STRINGS processed by FUNC. | 70 | "Concat STRINGS processed by FUNC. |
| 64 | Each of STRINGS can be a bare string or a list. Strings are | 71 | Each of STRINGS can be a bare string or a list. Strings are |