diff --git a/telega-chat.el b/telega-chat.el index 90aba9c..c016b3f 100644 --- a/telega-chat.el +++ b/telega-chat.el @@ -6649,9 +6649,13 @@ containing QUERY sent by specified sender." (interactive (list (get-buffer-window))) (when (or (null win) (eq (selected-window) win)) - (let ((new-fill-column (1- (/ (- (window-width win 'pixels) - (line-number-display-width 'pixels)) - (telega-chars-xwidth 1))))) + (let ((new-fill-column (- (window-width win) + (with-selected-window win + (line-number-display-width)) + (or (car visual-fill-column-extra-text-width) + 0) + (or (cdr visual-fill-column-extra-text-width) + 1)))) (when (and new-fill-column (> new-fill-column 15) ;XXX ignore too narrow window (not (eq new-fill-column telega-chat-fill-column))) diff --git a/telega.el b/telega.el index 0bd9ce8..22b06db 100644 --- a/telega.el +++ b/telega.el @@ -8,8 +8,8 @@ ;; Keywords: comm ;; Package-Requires: ((emacs "27.1") (visual-fill-column "1.9") (rainbow-identifiers "0.2.2")) ;; URL: https://github.com/zevlg/telega.el -;; Version: 0.8.252 -(defconst telega-version "0.8.252") +;; Version: 0.8.253 +(defconst telega-version "0.8.253") (defconst telega-server-min-version "0.7.7") (defconst telega-tdlib-min-version "1.8.24") (defconst telega-tdlib-max-version nil)