Mirrors/exwm
2
0
Fork 0
mirror of https://github.com/ch11ng/exwm.git synced 2024-11-23 19:47:58 +01:00
Code Issues Projects Releases Packages Wiki Activity

Fix checkdoc warnings

Browse source
This commit is contained in:
Chris Feng 2017-02-05 17:50:52 +08:00
parent 9926d87b65
commit f221f837cb
7 changed files with 13 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
exwm-cm.el
View file

@ -115,7 +115,7 @@
"The default value of opacity when it's not explicitly specified. "The default value of opacity when it's not explicitly specified.
The value should be a floating number between 0 (transparent) and 100 The value should be a floating number between 0 (transparent) and 100
(opaque). A value of nil also means opaque.") \(opaque). A value of nil also means opaque.")
(defvar exwm-cm--hash nil (defvar exwm-cm--hash nil
"The hash table associating X window IDs to their attributes.") "The hash table associating X window IDs to their attributes.")
@ -226,7 +226,7 @@ If called interactively, XWIN would be the selected X window."
(car (exwm-cm--get-tree xwin))) (car (exwm-cm--get-tree xwin)))
(defsubst exwm-cm--get-siblings (xwin) (defsubst exwm-cm--get-siblings (xwin)
"Get a list of subtrees of the siblings of X window XWIN" "Get a list of subtrees of the siblings of X window XWIN."
(cdr (exwm-cm--get-tree xwin))) (cdr (exwm-cm--get-tree xwin)))
(defsubst exwm-cm--get-subtree (xwin) (defsubst exwm-cm--get-subtree (xwin)

2
exwm-config.el
View file

@ -119,4 +119,4 @@ You can find the original one at `exwm-config-ido-buffer-window-other-frame'."
(provide 'exwm-config) (provide 'exwm-config)
;; exwm-config.el ends here ;;; exwm-config.el ends here

4
exwm-layout.el
View file

@ -178,7 +178,7 @@
(interactive) (interactive)
(with-current-buffer (if id (exwm--id->buffer id) (window-buffer)) (with-current-buffer (if id (exwm--id->buffer id) (window-buffer))
(when (memq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state) (when (memq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state)
(user-error "Already in full-screen mode.")) (user-error "Already in full-screen mode"))
;; Save the position of floating frame. ;; Save the position of floating frame.
(when exwm--floating-frame (when exwm--floating-frame
(let* ((geometry (xcb:+request-unchecked+reply exwm--connection (let* ((geometry (xcb:+request-unchecked+reply exwm--connection
@ -232,7 +232,7 @@
(interactive) (interactive)
(with-current-buffer (if id (exwm--id->buffer id) (window-buffer)) (with-current-buffer (if id (exwm--id->buffer id) (window-buffer))
(unless (memq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state) (unless (memq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state)
(user-error "Not in full-screen mode.")) (user-error "Not in full-screen mode"))
;; Restore the size of this workspace. ;; Restore the size of this workspace.
(exwm-workspace--set-fullscreen exwm--frame) (exwm-workspace--set-fullscreen exwm--frame)
(if exwm--floating-frame (if exwm--floating-frame

5
exwm-randr.el
View file

@ -22,8 +22,9 @@
;;; Commentary: ;;; Commentary:
;; This module adds RandR support for EXWM. Currently it requires external ;; This module adds RandR support for EXWM. Currently it requires external
;; tools such as xrandr(1) to properly configure RandR first. This dependency ;; tools such as xrandr(1) to properly configure RandR first. This
;; may be removed in the future, but more work is needed before that. ;; dependency may be removed in the future, but more work is needed before
;; that.
;; To use this module, load, enable it and configure ;; To use this module, load, enable it and configure
;; `exwm-randr-workspace-output-plist' and `exwm-randr-screen-change-hook' ;; `exwm-randr-workspace-output-plist' and `exwm-randr-screen-change-hook'

2
exwm-systemtray.el
View file

@ -485,4 +485,4 @@ You shall use the default value if using auto-hide minibuffer.")
(provide 'exwm-systemtray) (provide 'exwm-systemtray)
;; exwm-systemtray.el ends here ;;; exwm-systemtray.el ends here

2
exwm-workspace.el
View file

@ -116,7 +116,7 @@ NIL if FRAME is not a workspace"
(defvar exwm-workspace--prompt-add-allowed nil (defvar exwm-workspace--prompt-add-allowed nil
"Non-nil to allow adding workspace from the prompt.") "Non-nil to allow adding workspace from the prompt.")
(defvar exwm-workspace--prompt-delete-allowed nil (defvar exwm-workspace--prompt-delete-allowed nil
"Non-nil to allow deleting workspace from the prompt") "Non-nil to allow deleting workspace from the prompt.")
(defvar exwm-workspace--create-silently nil (defvar exwm-workspace--create-silently nil
"When non-nil workspaces are created in the background (not switched to). "When non-nil workspaces are created in the background (not switched to).