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)