diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index 6e4d88b4df..fba817b010 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -324,7 +324,8 @@ string-pixel-width (with-current-buffer (get-buffer-create " *string-pixel-width*") (delete-region (point-min) (point-max)) (insert string) - (car (buffer-text-pixel-size nil nil t))))) + (- (car (buffer-text-pixel-size nil nil t)) + (line-number-display-width t))))) ;;;###autoload (defun string-glyph-split (string) diff --git a/lisp/display-line-numbers.el b/lisp/display-line-numbers.el index 897a88398f..cf5d353fba 100644 --- a/lisp/display-line-numbers.el +++ b/lisp/display-line-numbers.el @@ -101,7 +101,8 @@ display-line-numbers-mode (defun display-line-numbers--turn-on () "Turn on `display-line-numbers-mode'." - (unless (minibufferp) + (unless (or (minibufferp) + (string-match-p "\\` " (buffer-name))) (display-line-numbers-mode))) ;;;###autoload