Minor, general refactors

2019-03-09 02:42:03 -05:00 · 2019-03-09 02:42:03 -05:00 · 54d1c0dd56
commit 54d1c0dd56
parent 442bd7cfb9
8 changed files with 22 additions and 17 deletions
--- a/modules/ui/doom-dashboard/config.el
+++ b/modules/ui/doom-dashboard/config.el
@ -429,7 +429,11 @@ controlled by `+doom-dashboard-pwd-policy'."
                            (with-temp-buffer
                              (save-excursion (insert (key-description key)))
                              (while (re-search-forward "<\\([^>]+\\)>" nil t)
-                                (replace-match (upcase (substring (match-string 1) 0 3))))
+                                (let ((str (match-string 1)))
+                                  (replace-match
+                                   (upcase (if (< (length str) 3)
+                                               str
+                                             (substring str 0 3))))))
                              (propertize (buffer-string) 'face 'font-lock-constant-face)))
                          ""))))
           (if (display-graphic-p)