Change to when-let* and if-let*
This commit is contained in:
@ -264,7 +264,7 @@ SERVER is the server from which to get the rules."
|
||||
"Setup up SERVER for the first time."
|
||||
;; make sure that dir local stuff is picked up
|
||||
(save-current-buffer
|
||||
(when-let ((buf (cl-first (eglot--managed-buffers server))))
|
||||
(when-let* ((buf (cl-first (eglot--managed-buffers server))))
|
||||
(set-buffer buf))
|
||||
(setf
|
||||
;; merger of global values is mediated elsewhere
|
||||
@ -392,7 +392,7 @@ language setting in any file."
|
||||
current-prefix-arg))
|
||||
(unless (ltex-eglot-server-p server)
|
||||
(user-error "Current server is not an LTeX server!"))
|
||||
(when-let ((server (eglot-current-server)))
|
||||
(when-let* ((server (eglot-current-server)))
|
||||
(setf (ltex-eglot-server--language server) language)
|
||||
(let ((ltex-eglot-variable-save-method
|
||||
(and (not no-save)
|
||||
|
||||
Reference in New Issue
Block a user