# HG changeset patch # User yuuji@gentei.org # Date 1276901050 -32400 # Node ID 5c61fe39f1c4f9a1e5fed6463753a3a0b4498976 # Parent 94a1370956a4c9be6da223e8d5a3b04880787cd9 Suppress insertion of superfluous newline at duplication of previous . diff -r 94a1370956a4 -r 5c61fe39f1c4 yahtml.el --- a/yahtml.el Fri May 28 15:22:11 2010 +0900 +++ b/yahtml.el Sat Jun 19 07:44:10 2010 +0900 @@ -1,6 +1,6 @@ ;;; -*- Emacs-Lisp -*- ;;; (c) 1994-2010 by HIROSE Yuuji [yuuji(@)yatex.org] -;;; Last modified Fri Feb 12 21:30:03 2010 on firestorm +;;; Last modified Sat Jun 19 07:40:38 2010 on firestorm ;;; $Id$ (defconst yahtml-revision-number "1.74.2" @@ -2685,7 +2685,7 @@ (cond ((and (> cols 0) (memq (read-char) '(?d ?D))) ;Duplication mode - (setq line (YaTeX-buffer-substring (point) cp))) + (setq line (YaTeX-buffer-substring (point) (1- cp)))) (t ;empty cells (setq line "" i 0) (if (> cols 0)