16 lines
330 B
EmacsLisp
16 lines
330 B
EmacsLisp
;; -*- lexical-binding: t; -*-
|
|
(defun hgh/edit-init-file ()
|
|
(interactive)
|
|
(find-file user-init-file))
|
|
|
|
(defun hgh/duplicate-dwim ()
|
|
(interactive)
|
|
(duplicate-dwim)
|
|
(next-line))
|
|
|
|
(defun hgh/set-bar-cursor(&rest args)
|
|
(setq-local cursor-type 'bar))
|
|
|
|
(defun hgh/set-box-cursor(&rest args)
|
|
(setq-local cursor-type 'box))
|