Mercurial > hgrepos > hgweb.cgi > yatex

changeset 239:5de195a540c7 dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
YaTeX-intelligent-newline-document recognizes \par lover.
author yuuji@gentei.org
date Sun, 29 Jan 2012 17:29:02 +0900
parents 5260b7ee9fdf
children 5ab3322d0f03
files yatex.el yatexenv.el
diffstat 2 files changed, 11 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/yatex.el	Sun Jan 29 16:13:07 2012 +0900
+++ b/yatex.el	Sun Jan 29 17:29:02 2012 +0900
@@ -1,15 +1,15 @@
 ;;; -*- Emacs-Lisp -*-
 ;;; Yet Another tex-mode for emacs - //–ì’¹//
-;;; yatex.el rev. 1.75.2
+;;; yatex.el rev. 1.75.3
 ;;; (c)1991-2012 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Mon Jan 23 07:58:11 2012 on firestorm
+;;; Last modified Sun Jan 29 17:27:03 2012 on firestorm
 ;;; $Id$
 ;;; The latest version of this software is always available at;
 ;;; http://www.yatex.org/
 
 (require 'comment)
 (require 'yatexlib)
-(defconst YaTeX-revision-number "1.75.2"
+(defconst YaTeX-revision-number "1.75.3"
   "Revision number of running yatex.el")
 
 ;---------- Local variables ----------
--- a/yatexenv.el	Sun Jan 29 16:13:07 2012 +0900
+++ b/yatexenv.el	Sun Jan 29 17:29:02 2012 +0900
@@ -2,7 +2,7 @@
 ;;; YaTeX environment-specific functions.
 ;;; yatexenv.el
 ;;; (c) 1994-2006 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Sun Jan 29 16:08:09 2012 on firestorm
+;;; Last modified Sun Jan 29 17:23:40 2012 on firestorm
 ;;; $Id$
 
 ;;;
@@ -261,8 +261,13 @@
 ;; For document environment
 ;;;
 (defun YaTeX-intelligent-newline-document ()
-  "New paragraph."
-  (newline))				;Do you prefer `\par'?
+  "New paragraph by null line or `\\par'."
+  (if (save-excursion (re-search-backward "\\\\par\\>" nil t))
+      (progn
+	(YaTeX-indent-line)
+	(insert "\\par")))
+  (newline)
+  (YaTeX-indent-line))
 
 ;;;
 ;; Intelligent newline

yatex.org