Remove more (fboundp 'gnutls-available-p)

[gnu-emacs] / lisp / term.el

diff --git a/lisp/term.el b/lisp/term.el
index 611a0c660e1e930b432b95a4ed2c51d352316758..282dfe2ea80392bb2d881162401fb7821660c21e 100644 (file)
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -972,6 +972,9 @@ is buffer-local."
   (if (and (not (featurep 'xemacs))
           (display-graphic-p)
           overflow-newline-into-fringe
+          ;; Subtract 1 from the width when any fringe has zero width,
+          ;; not just the right fringe.  Bug#18601.
+          (/= (frame-parameter nil 'left-fringe) 0)
           (/= (frame-parameter nil 'right-fringe) 0))
       (window-body-width)
     (1- (window-body-width))))