From 82dcdbb459db9a398ad249b259c18f26458cf90c Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 30 Mar 2021 11:58:37 -0500 Subject: Fix arrayp bug in `acdw-modeline/vc-branch' --- lisp/acdw-modeline.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index a364cef..c7b904f 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el @@ -65,7 +65,7 @@ indicator in the mode-line." ;; from https://www.gonsie.com/blorg/modeline.html, from Doom (defun acdw-modeline/vc-branch () - (let ((backend (vc-backend buffer-file-name))) + (if-let ((backend (vc-backend buffer-file-name))) (substring vc-mode (+ (if (eq backend 'Hg) 2 3) 2)))) ;; from gonsie -- cgit 1.4.1-21-gabe81