2022-02-14 16:16:50 +00:00
|
|
|
;;; -*- mode: emacs-lisp; -*-
|
|
|
|
|
|
|
|
emacs-lisp-mode
|
|
|
|
|
|
|
|
(la "(lambda (" p ")" n> r> ")")
|
|
|
|
(dv "(defvar " p "\n \"" p "\")")
|
|
|
|
(dc "(defcustom " p "\n \"" p "\"" n> ":type '" p ")")
|
|
|
|
(dg "(defgroup " p " nil\n \"" p "\"" n> ":group '" p n> ":prefix \"" p "-\")")
|
|
|
|
(dm "(defmacro " p " (" p ")\n \"" p "\"" n> r> ")")
|
|
|
|
(df "(defun " p " (" p ")\n \"" p "\"" n> r> ")")
|
|
|
|
(l "(let (" p ")" n> r> ")")
|
|
|
|
(ls "(let* (" p ")" n> r> ")")
|
|
|
|
(cdg "(cl-defgeneric " p " (" ")" n> ")")
|
|
|
|
(cdm "(cl-defmethod " p " (" ")" n> ")")
|
2022-02-14 16:18:56 +00:00
|
|
|
(pm "(point-min)")
|
|
|
|
(pM "(point-max)")
|
2022-02-16 13:27:02 +00:00
|
|
|
(up "(use-package " (p "package") ")")
|
2022-02-18 21:35:32 +00:00
|
|
|
|
|
|
|
slime-repl-mode
|
|
|
|
|
|
|
|
(qq "(ql:quickload '(" (p ":packages") "))")
|
|
|
|
(ip "(in-package :" (p "package") ")")
|