Mercurial > hgrepos > hgweb.cgi > yatex
diff yatexlib.el @ 86:f14ec50103d0
as of 2009/9/28
author | yuuji@gentei.org |
---|---|
date | Mon, 28 Sep 2009 07:56:08 +0900 |
parents | 9b4354af748c |
children | ce2deaceb818 |
line wrap: on
line diff
--- a/yatexlib.el Sun Sep 27 12:53:18 2009 +0000 +++ b/yatexlib.el Mon Sep 28 07:56:08 2009 +0900 @@ -2,7 +2,7 @@ ;;; YaTeX and yahtml common libraries, general functions and definitions ;;; yatexlib.el ;;; (c)1994-2006 by HIROSE Yuuji.[yuuji@yatex.org] -;;; Last modified Sun Dec 24 15:12:20 2006 on firestorm +;;; Last modified Sat Apr 18 07:32:45 2009 on firestorm ;;; $Id$ ;; General variables @@ -313,8 +313,9 @@ ;;;###autoload (defun YaTeX-define-begend-key (key env &optional map) - "Define short cut key for begin type completion both for normal -and region mode. To customize YaTeX, user should use this function." + "Define short cut key for begin type completion. +Define both strokes for normal and region mode. +To customize YaTeX, user should use this function." (YaTeX-define-begend-key-normal key env map) (if YaTeX-inhibit-prefix-letter nil (YaTeX-define-begend-region-key @@ -487,7 +488,7 @@ that gives the maximum value by the FUNC. FUNC should take an argument of its window object. Non-nil for optional third argument SELECT selects that window. This function never selects minibuffer window." - (or (and (if (and YaTeX-emacs-19 select) + (or (and (if (and YaTeX-emacs-19 select window-system) (get-buffer-window buffer t) (get-buffer-window buffer)) (progn @@ -516,7 +517,7 @@ (or select (select-window window))) (t ;if one-window (cond - ((and YaTeX-emacs-19 (get-buffer-window buffer t)) + ((and YaTeX-emacs-19 window-system (get-buffer-window buffer t)) nil) ;if found in other frame (YaTeX-default-pop-window-height (split-window-calculate-height YaTeX-default-pop-window-height)