Only use string-pixel-width in 29+.

Close #601. compat provides string-pixel-width but it has bad performance, thus will freeze Emacs.
seagle0128 · Jan 7, 2023 · fb516af · fb516af
1 parent 4224fce
commit fb516af
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/doom-modeline-core.el b/doom-modeline-core.el
@@ -1087,7 +1087,8 @@ Example:
                           :align-to
                           (- (+ right right-fringe right-margin scroll-bar)
                              ,(let ((rhs-str (format-mode-line (cons "" rhs-forms))))
-                                (if (fboundp 'string-pixel-width)
+                                (if (and (>= emacs-major-version 29)
+                                         (fboundp 'string-pixel-width))
                                     (/ (string-pixel-width rhs-str)
                                        (doom-modeline--font-width)
                                        1.0)