yatex

diff yatexlib.el @ 524:b1896ef49747

Detection of region passed to filter modified.
author HIROSE Yuuji <yuuji@gentei.org>
date Tue, 23 Jan 2018 10:44:10 +0900
parents b6853d450b0a
children b742adfa30e2
line diff
     1.1 --- a/yatexlib.el	Thu Jan 04 23:58:07 2018 +0900
     1.2 +++ b/yatexlib.el	Tue Jan 23 10:44:10 2018 +0900
     1.3 @@ -1,7 +1,7 @@
     1.4  ;;; yatexlib.el --- YaTeX and yahtml common libraries -*- coding: sjis -*-
     1.5  ;;; 
     1.6  ;;; (c)1994-2018 by HIROSE Yuuji.[yuuji@yatex.org]
     1.7 -;;; Last modified Thu Jan  4 13:58:20 2018 on firestorm
     1.8 +;;; Last modified Sun Jan 21 16:29:01 2018 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;;; Code:
    1.12 @@ -1224,8 +1224,8 @@
    1.13  	;;(if (eobp) nil (forward-char 1))	;OUT 2015/1/5
    1.14  	))))
    1.15  
    1.16 -(defun YaTeX-in-BEGEND-p ()
    1.17 -  "Check if the point is in a %#BEGIN...%#END region.
    1.18 +(defun YaTeX-in-BEGEND-p (&optional pt)
    1.19 +  "Check if the point (or PT) is in a %#BEGIN...%#END region.
    1.20  Return the list of beginning and ending point of the region and arg-string
    1.21  if the point is in BEGEND.  Otherwise nil."
    1.22    (let ((b "%#BEGIN") bp args (e "%#END") (p (point)))