blob: 5325ee94ebcc3fce74020220215aee22ee2b3f90 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
;;; 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
|