From 6a8748d142e1383cf8d6b5bf6ed361491ab82e3b Mon Sep 17 00:00:00 2001 From: David Morgan Date: Wed, 18 May 2022 14:06:19 +0100 Subject: Fix eldoc docstring length warnings --- .emacs.d/lisp/init-navigation.el | 6 ++++-- .emacs.d/lisp/init-project.el | 8 +++++--- 2 files changed, 9 insertions(+), 5 deletions(-) diff --git a/.emacs.d/lisp/init-navigation.el b/.emacs.d/lisp/init-navigation.el index d0df0f1..d3024aa 100644 --- a/.emacs.d/lisp/init-navigation.el +++ b/.emacs.d/lisp/init-navigation.el @@ -16,7 +16,8 @@ If a numeric prefix argument N is given, move forward N instances of char." (defun goto-char-forward-repeat-last (arg) "Move forward in line to char last used in a goto-char command. If a C-u prefix argument is given, it is not restricted to the current line. -If a numeric prefix argument N is given, move forward N instances of the last used char." +If a numeric prefix argument N is given, move forward N instances of the last +used char." (interactive "P") (goto-char--move-forward arg)) @@ -31,7 +32,8 @@ If a numeric prefix argument N is given, move back N instances of char." (defun goto-char-backward-repeat-last (arg) "Move backward in line to char last qused in a goto-char command. If a C-u prefix argument is given, it is not restricted to the current line. -If a numeric prefix argument N is given, move back N instances of the last used char." +If a numeric prefix argument N is given, move back N instances of the last used +char." (interactive "P") (goto-char--move-backward arg)) diff --git a/.emacs.d/lisp/init-project.el b/.emacs.d/lisp/init-project.el index bacf4ac..f1e58c0 100644 --- a/.emacs.d/lisp/init-project.el +++ b/.emacs.d/lisp/init-project.el @@ -76,7 +76,8 @@ :config ;; Based on jao-buffer-same-mode (https://jao.io/blog/2021-09-08-high-signal-to-noise-emacs-command.html) (defun persp-switch-buffer-same-mode () - "Switch to a buffer with the same major mode as the current buffer, respecting the current perspective." + "Switch to a buffer with the same major mode as the current buffer, respecting +the current perspective." (interactive) (let* ((mode major-mode) (pred (lambda (b) @@ -84,7 +85,8 @@ (eq (buffer-local-value 'major-mode b) mode))))) (pop-to-buffer (persp-read-buffer "Buffer: " nil t pred)))) (defun persp-previous-buffer-same-mode () - "Switch to the previous buffer in the current perspective, with the same major mode as the current buffer (or do nothing)" + "Switch to the previous buffer in the current perspective, with the same major +mode as the current buffer (or do nothing)" (interactive) (let* ((persp-buffers (seq-filter 'persp-is-current-buffer (buffer-list))) (mode major-mode) @@ -97,7 +99,7 @@ (when (not (seq-empty-p persp-buffers-in-mode)) (switch-to-buffer (car persp-buffers-in-mode))))) (defun persp-current-project-root () - "Return the current project root, falling back to finding it using the perpsective" + "Return the current project root, falling back to finding it by the perpsective" (if-let (project (project-current)) (project-root project) (when-let (persp (persp-name (persp-curr))) -- cgit 1.4.1-2-gfad0