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