gave up on meow / god mode, just using ';' now
This commit is contained in:
+1
-16
@@ -39,10 +39,6 @@ Blocks are defined by: whitespace, alphanumerics, or groups of symbols."
|
||||
|
||||
(delete-region (point) end)))))
|
||||
|
||||
(defun my-set-buffer-font ()
|
||||
"Set a specific font for the current buffer only."
|
||||
(buffer-face-set '(:family "Noto Sans" :height 140)))
|
||||
|
||||
(defun my/toggle-quote-wrap-all-in-region (beg end)
|
||||
"Toggle wrapping all items in region with double quotes."
|
||||
;;https://xenodium.com/emacs-quote-wrap-all-in-region
|
||||
@@ -60,17 +56,6 @@ Blocks are defined by: whitespace, alphanumerics, or groups of symbols."
|
||||
(delete-region beg end)
|
||||
(insert replacement)))
|
||||
|
||||
(defun my/meow-wrap-arbitrary (s e)
|
||||
"Wrap the current meow selection with arbitrary strings."
|
||||
(interactive "r")
|
||||
(let ((start-str (read-string "Start: "))
|
||||
(end-str (read-string "End: ")))
|
||||
(save-excursion
|
||||
(goto-char e)
|
||||
(insert end-str)
|
||||
(goto-char s)
|
||||
(insert start-str))))
|
||||
|
||||
(defun my/column-align-regexp ()
|
||||
"Aligns the matched regexp to `comment-column`.
|
||||
If the text preceding the regexp is already past `comment-column`,
|
||||
@@ -81,7 +66,7 @@ it ensures exactly one space of separation."
|
||||
(target-col (if (and (boundp 'comment-column)
|
||||
(numberp comment-column))
|
||||
comment-column
|
||||
40))
|
||||
80))
|
||||
(start (region-beginning))
|
||||
(end (region-end)))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user