[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
rcirc: feature request: window-width in rcirc-fill-column
From: |
trentbuck |
Subject: |
rcirc: feature request: window-width in rcirc-fill-column |
Date: |
Mon, 21 May 2007 18:56:14 +1000 |
rcirc allows text to flow up to the current frame width. This is
probably undesirable when horizontal splitting (C-x 3) is used,
therefore I suggest replacing or supplementing the 'frame-width
special case with the 'window-width special case.
| --- rcirc.el 2007-05-21 18:49:51.000000000 +1000
| +++ rcirc.el 2007-05-21 18:51:14.811382886 +1000
| @@ -96,9 +96,11 @@
| (defcustom rcirc-fill-column nil
| "*Column beyond which automatic line-wrapping should happen.
| If nil, use value of `fill-column'. If 'frame-width, use the
| -maximum frame width."
| +maximum frame width. If 'window-width, use the current window
| +width."
| :type '(choice (const :tag "Value of `fill-column'")
| (const :tag "Full frame width" frame-width)
| + (const :tag "Full window width" window-width)
| (integer :tag "Number of columns"))
| :group 'rcirc)
|
| @@ -1245,6 +1247,8 @@
| (make-string (- text-start fill-start) ?\s)))
| (fill-column (cond ((eq rcirc-fill-column 'frame-width)
| (1- (frame-width)))
| + ((eq rcirc-fill-column
'window-width)
| + (1- (window-width)))
| (rcirc-fill-column
| rcirc-fill-column)
| (t fill-column))))
|