yatex

diff yatexlib.el @ 182:67b1e094e151

Direct call to screen-{height,width} avoided for coming emacsen.
author yuuji@gentei.org
date Thu, 13 Oct 2011 09:50:45 +0900
parents ab02213f5683
children 2f91947a43a1
line diff
     1.1 --- a/yatexlib.el	Fri Feb 18 15:33:21 2011 +0900
     1.2 +++ b/yatexlib.el	Thu Oct 13 09:50:45 2011 +0900
     1.3 @@ -2,7 +2,7 @@
     1.4  ;;; YaTeX and yahtml common libraries, general functions and definitions
     1.5  ;;; yatexlib.el
     1.6  ;;; (c)1994-2009 by HIROSE Yuuji.[yuuji@yatex.org]
     1.7 -;;; Last modified Fri Feb 18 15:05:08 2011 on firestorm
     1.8 +;;; Last modified Thu Oct 13 09:36:20 2011 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;; General variables
    1.12 @@ -530,11 +530,15 @@
    1.13  (cond
    1.14   ((fboundp 'screen-height)
    1.15    (fset 'YaTeX-screen-height 'screen-height)
    1.16 -  (fset 'YaTeX-screen-width 'screen-width))
    1.17 +  (fset 'YaTeX-screen-width 'screen-width)
    1.18 +  (fset 'YaTeX-set-screen-height 'set-screen-height)
    1.19 +  (fset 'YaTeX-set-screen-width 'set-screen-width))
    1.20   ((fboundp 'frame-height)
    1.21    (fset 'YaTeX-screen-height 'frame-height)
    1.22 -  (fset 'YaTeX-screen-width 'frame-width))
    1.23 - (t (error "I don't know how to run windows.el on this Emacs...")))
    1.24 +  (fset 'YaTeX-screen-width 'frame-width)
    1.25 +  (fset 'YaTeX-set-screen-height 'set-frame-height)
    1.26 +  (fset 'YaTeX-set-screen-width 'set-frame-width))
    1.27 + (t (error "I don't know how to run YaTeX on this Emacs...")))
    1.28  
    1.29  ;;;###autoload
    1.30  (defun split-window-calculate-height (height)