Hi, 

I found small bug for multi-byte string on formatting column.

Attaching diff for texinfmt-version "2.38 of 3 July 1998".

By the way, where can I get current texinfo.el and texifmt.el files
adapted to TeXinfo 4.0 ?

## Via list? or CVS? or ...

--- Regards,
 Shun-ichi Goto  <[EMAIL PROTECTED]>
   R&D Group, TAIYO Corp., Tokyo, JAPAN


*** texinfmt.el.orig    Sat Jul 17 16:15:07 1999
--- texinfmt.el Wed Oct 20 12:24:24 1999
*************** (defun texinfo-multitable-item ()
*** 2067,2079 ****
  ;; 3. Move point to end of bottom line, and pad that line to fill column.
        (goto-char (point-min))
        (forward-line (1- table-entry-height))
!       (let* ((beg (point))                      ; beginning of line
               ;; add one more space for inter-column spacing
               (needed-whitespace
                (1+
                 (- fill-column
                    (-
!                    (progn (end-of-line) (point)) ; end of existing line
                     beg)))))
          (insert (make-string
                   (if (> needed-whitespace 0) needed-whitespace 1)
--- 2067,2080 ----
  ;; 3. Move point to end of bottom line, and pad that line to fill column.
        (goto-char (point-min))
        (forward-line (1- table-entry-height))
!       (let* ((beg (current-column))           ; start column of line
               ;; add one more space for inter-column spacing
               (needed-whitespace
                (1+
                 (- fill-column
                    (-
!                    (progn (end-of-line) 
!                         (current-column))     ; end column of existing line
                     beg)))))
          (insert (make-string
                   (if (> needed-whitespace 0) needed-whitespace 1)

Reply via email to