# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1080027335 0
# Node ID 796bcfb5fa61100937d9e78f8c76ebe239abc89b
# Parent  9172c9ef1dcf1b54f08a97c5c84c7700ff8b7d09
(woman-fill-frame): Doc fix.
(woman-decode-region): Use window-width instead of frame-width.

diff -r 9172c9ef1dcf -r 796bcfb5fa61 lisp/woman.el
--- a/lisp/woman.el	Tue Mar 23 07:33:39 2004 +0000
+++ b/lisp/woman.el	Tue Mar 23 07:35:35 2004 +0000
@@ -809,7 +809,7 @@
 
 (defcustom woman-fill-frame nil
   ;; Based loosely on a suggestion by Theodore Jump:
-  "*If non-nil then most of the frame width is used."
+  "*If non-nil then most of the window width is used."
   :type 'boolean
   :group 'woman-formatting)
 
@@ -2211,7 +2211,7 @@
     ;; Based loosely on a suggestion by Theodore Jump:
     (if (or woman-fill-frame
 	    (not (and (integerp woman-fill-column) (> woman-fill-column 0))))
-	(setq woman-fill-column (- (frame-width) woman-default-indent)))
+	(setq woman-fill-column (- (window-width) woman-default-indent)))
 
     ;; Check for preprocessor requests:
     (goto-char from)