heckyel/emacs-base
0
0
Fork 0
Code Issues Pull Requests Releases Activity

refactoring code

Browse Source
This commit is contained in:
Jesus E
2023-05-12 23:08:14 -04:00
parent 4177899f78
commit df9488c745
7 changed files with 106 additions and 81 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lisp/lib/myemacs.el
View File

@@ -1,18 +0,0 @@
;;----------------------------------------------------------------------------
;; Some cool functions
;;----------------------------------------------------------------------------
;; These functions are made by me (Quitter: @heckyel) or
;; heavily modified by me
;;----------------------------------------------------------------------------
;; Toggles fullscreen
;;----------------------------------------------------------------------------
(defun myemacs/toggle-fullscreen ()
(interactive)
(x-send-client-message nil 0 nil "_NET_WM_STATE" 32
'(2 "_NET_WM_STATE_FULLSCREEN" 0)))
(defun myemacs/elapsed-time ()
(let ((elapsed (float-time (time-subtract (current-time)
emacs-start-time))))
(message "[STARTUP] Loading %s ... done (%.3fs)" load-file-name elapsed)))