Replace function aliases with their real names (#14688)

`first` and `list-length` are aliases for `car` and `cl-list-length`
respectively. Using these aliases causes emacs to error with a `symbol's function
definition is void` error, but using their real names causes no error.

Replaced them with `car` and `length`.
This commit is contained in:
Kjartan Óli Ágústsson 2021-04-21 19:42:26 +00:00 committed by GitHub
parent ec2c511c6f
commit e290b10060
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 3 deletions

View File

@ -58,4 +58,4 @@ Can show completions at point for COMMAND using helm"
;; Other utilities
(defun exwm//flatenum (i ls)
(if ls (cons i (cons (first ls) (exwm//flatenum (1+ i) (cdr ls)))) (list)))
(if ls (cons i (cons (car ls) (exwm//flatenum (1+ i) (cdr ls)))) (list)))

View File

@ -71,8 +71,8 @@
;; At the user's option, begin with even more workspaces
(setq exwm-workspace-number
(if exwm-workspace-number
(max exwm-workspace-number (list-length exwm--randr-displays))
(list-length exwm--randr-displays)))
(max exwm-workspace-number (length exwm--randr-displays))
(length exwm--randr-displays)))
;; The first workspaces will match the order in RandR
(setq exwm-randr-workspace-output-plist
(exwm//flatenum 0 exwm--randr-displays))