diff options
author | William Carroll <wpcarro@gmail.com> | 2022-07-30T18·05-0700 |
---|---|---|
committer | clbot <clbot@tvl.fyi> | 2022-08-01T17·23+0000 |
commit | 9f325f01bf80dcabdbd743421645a12064a4373d (patch) | |
tree | b8fbe433130ee8665d21c271120ca722a43a2b31 /users/wpcarro/emacs/.emacs.d/wpc/functions.el | |
parent | a004be56b39ce48ba7e8530ecd5d1f6fc00a70d5 (diff) |
refactor(wpcarro/emacs): Drop support for functions.el r/4360
This was one of my original dumping grounds for Elisp functions. Nice to demolish it. Change-Id: I18102f04690131e66ec0d4362f8305e56e7a6ed7 Reviewed-on: https://cl.tvl.fyi/c/depot/+/6015 Tested-by: BuildkiteCI Reviewed-by: wpcarro <wpcarro@gmail.com> Autosubmit: wpcarro <wpcarro@gmail.com>
Diffstat (limited to 'users/wpcarro/emacs/.emacs.d/wpc/functions.el')
-rw-r--r-- | users/wpcarro/emacs/.emacs.d/wpc/functions.el | 46 |
1 files changed, 0 insertions, 46 deletions
diff --git a/users/wpcarro/emacs/.emacs.d/wpc/functions.el b/users/wpcarro/emacs/.emacs.d/wpc/functions.el deleted file mode 100644 index 936e25eb2d07..000000000000 --- a/users/wpcarro/emacs/.emacs.d/wpc/functions.el +++ /dev/null @@ -1,46 +0,0 @@ -;;; functions.el --- Helper functions -*- lexical-binding: t -*- - -;; Author: William Carroll <wpcarro@gmail.com> -;; Version: 0.0.1 -;; Package-Requires: ((emacs "24")) - -;;; Commentary: -;; This file hopefully contains friendly APIs that making ELisp development more -;; enjoyable. - -;; TODO: Break these out into separate modules. - -;;; Code: -(defun functions-evil-window-vsplit-right () - "Split the window vertically and focus the right half." - (interactive) - (evil-window-vsplit) - (windmove-right)) - -(defun functions-evil-window-split-down () - "Split the window horizontal and focus the bottom half." - (interactive) - (evil-window-split) - (windmove-down)) - -(defun functions-create-snippet () - "Create a window split and then opens the Yasnippet editor." - (interactive) - (evil-window-vsplit) - (call-interactively #'yas-new-snippet)) - -(defun functions-evil-replace-under-point () - "Faster than typing %s//thing/g." - (interactive) - (let ((term (s-replace "/" "\\/" (symbol-to-string (symbol-at-point))))) - (save-excursion - (evil-ex (concat "%s/\\b" term "\\b/"))))) - -(defun functions-buffer-dirname () - "Return the directory name of the current buffer as a string." - (->> buffer-file-name - f-dirname - f-filename)) - -(provide 'functions) -;;; functions.el ends here |