summaryrefslogtreecommitdiffstats
path: root/shell/_emacs.d/site-lisp/util.el
diff options
context:
space:
mode:
authorTharre <tharre3@gmail.com>2016-10-07 20:53:06 +0000
committerTharre <tharre3@gmail.com>2016-10-16 15:23:59 +0000
commitedbcca8cd2b93b8c88eb62c431d04ea832b73180 (patch)
treebac188c0ee4c1c214dd50568e70783a7ee2c3565 /shell/_emacs.d/site-lisp/util.el
parentd4f1a0f27100ff2f4380fa4cf38b09e7f0c051f7 (diff)
downloaddotfiles-edbcca8cd2b93b8c88eb62c431d04ea832b73180.tar.gz
dotfiles-edbcca8cd2b93b8c88eb62c431d04ea832b73180.tar.xz
dotfiles-edbcca8cd2b93b8c88eb62c431d04ea832b73180.zip
Reorganise dotfiles
Diffstat (limited to 'shell/_emacs.d/site-lisp/util.el')
-rw-r--r--shell/_emacs.d/site-lisp/util.el36
1 files changed, 0 insertions, 36 deletions
diff --git a/shell/_emacs.d/site-lisp/util.el b/shell/_emacs.d/site-lisp/util.el
deleted file mode 100644
index b5bdc10..0000000
--- a/shell/_emacs.d/site-lisp/util.el
+++ /dev/null
@@ -1,36 +0,0 @@
-(defun eval-and-replace ()
- "Replace the preceding sexp with its value."
- (interactive)
- (forward-char) ;; for evil normal state
- (backward-kill-sexp)
- (condition-case nil
- (prin1 (eval (read (current-kill 0)))
- (current-buffer))
- (error (message "Invalid expression")
- (insert (current-kill 0)))))
-
-(defun lorem ()
- "Insert a lorem ipsum."
- (interactive)
- (insert "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do "
- "eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim"
- "ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut "
- "aliquip ex ea commodo consequat. Duis aute irure dolor in "
- "reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla "
- "pariatur. Excepteur sint occaecat cupidatat non proident, sunt in "
- "culpa qui officia deserunt mollit anim id est laborum."))
-
-(defun insert-date ()
- "Insert a time-stamp according to locale's date and time format."
- (interactive)
- (insert (format-time-string "%c" (current-time))))
-
-(defun indent-buffer ()
- (interactive)
- (indent-region (point-min) (point-max)))
-
-(defun untabify-buffer ()
- (interactive)
- (untabify (point-min) (point-max)))
-
-(provide 'util)