Browse Source

Bugfix: Use `window-full-width-p' correctly.

Carsten Dominik 16 years ago
parent
commit
33897c104b
2 changed files with 4 additions and 1 deletions
  1. 3 0
      lisp/ChangeLog
  2. 1 1
      lisp/org-compat.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-01-18  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-compat.el (org-fit-window-to-buffer): Fix bug with using
+	`window-full-width-p'.
+
 	* org-exp.el (org-export-as-html): Only check for images files
 	that really can be inlined
 

+ 1 - 1
lisp/org-compat.el

@@ -158,7 +158,7 @@ passed through to `fit-window-to-buffer'.  If SHRINK-ONLY is set, call
 `shrink-window-if-larger-than-buffer' instead, the hight limit are
 ignored in this case."
   (cond ((if (fboundp 'window-full-width-p)
-	     (window-full-width-p window)
+	     (not (window-full-width-p window))
 	   (> (frame-width) (window-width window)))
 	 ;; do nothing if another window would suffer
 	 )