27 lines
906 B
EmacsLisp
27 lines
906 B
EmacsLisp
;;; myemacs.el --- .Emacs Configuration -*- lexical-binding: t -*-
|
|
;;; Commentary:
|
|
;;; myemacs reloj
|
|
|
|
;;; Code:
|
|
;;----------------------------------------------------------------------------
|
|
;; Some cool functions
|
|
;;----------------------------------------------------------------------------
|
|
;; These functions are made by me (Quitter: @heckyel) or
|
|
;; heavily modified by me
|
|
|
|
;;----------------------------------------------------------------------------
|
|
;; Toggles fullscreen
|
|
;;----------------------------------------------------------------------------
|
|
(defun myemacs/toggle-fullscreen ()
|
|
"Return a message string if the current doc string is invalid."
|
|
(interactive)
|
|
(x-send-client-message nil 0 nil "_NET_WM_STATE" 32
|
|
'(2 "_NET_WM_STATE_FULLSCREEN" 0)))
|
|
|
|
(provide 'myemacs)
|
|
|
|
;; Local Variables:
|
|
;; byte-compile-warnings: (not free-vars)
|
|
;; End:
|
|
;;; myemacs.el ends here
|