GNU bug report logs - #46317
27.1; format may return string with wrong text property positions

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 46317 in the body.
You can then email your comments to 46317 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: ynyaaa <at> gmail.com
To: bug-gnu-emacs <at> gnu.org
Subject: 27.1; format may return string with wrong text property positions
Date: Fri, 05 Feb 2021 14:14:57 +0900

The strings in the list retruned by the form below should have same text
property positions. But for '%3s' and '%3S', strings have wrong text
property positions.

(let ((s (propertize "X" 'prop "val")))
  (list (format (concat "%3s/" s) 12)
        (format (concat "%3S/" s) 12)
        (format (concat "%3d/" s) 12)
        (format (concat "%-3s/" s) 12)
        (format (concat "%-3S/" s) 12)
        (format (concat "%-3d/" s) 12)
        ))
=>(#(" 12/X" 1 2 (prop "val"))
   #(" 12/X" 1 2 (prop "val"))
   #(" 12/X" 4 5 (prop "val"))
   #("12 /X" 4 5 (prop "val"))
   #("12 /X" 4 5 (prop "val"))
   #("12 /X" 4 5 (prop "val")))


In GNU Emacs 27.1 (build 1, x86_64-w64-mingw32)
 of 2020-08-22 built on CIRROCUMULUS
Repository revision: 86d8d76aa36037184db0b2897c434cdaab1a9ae8
Repository branch: HEAD
Windowing system distributor 'Microsoft Corp.', version 10.0.18363
System Description: Microsoft Windows 10 Pro (v10.0.1909.18363.1316)

Recent messages:

Configured using:
 'configure --without-dbus --host=x86_64-w64-mingw32
 --without-compress-install 'CFLAGS=-O2 -static''

Configured features:
XPM JPEG TIFF GIF PNG RSVG SOUND NOTIFY W32NOTIFY ACL GNUTLS LIBXML2
HARFBUZZ ZLIB TOOLKIT_SCROLL_BARS MODULES THREADS JSON PDUMPER LCMS2 GMP

Important settings:
  value of $LANG: JPN
  locale-coding-system: cp932

Major mode: Lisp Interaction

Minor modes in effect:
  tooltip-mode: t
  global-eldoc-mode: t
  eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Load-path shadows:
None found.

Features:
(gnutls network-stream nsm mailalias smtpmail auth-source eieio
eieio-core cl-macs eieio-loaddefs json map rect cl-seq image-mode exif
misearch multi-isearch cl-extra cl-print thingatpt help-fns radix-tree
help-mode pp shadow sort mail-extr emacsbug message rmc puny dired
dired-loaddefs format-spec rfc822 mml easymenu mml-sec password-cache
epa derived epg epg-config gnus-util rmail rmail-loaddefs
text-property-search time-date subr-x seq byte-opt gv bytecomp
byte-compile cconv mm-decode mm-bodies mm-encode mail-parse rfc2231
mailabbrev gmm-utils mailheader cl-loaddefs cl-lib sendmail rfc2047
rfc2045 ietf-drums mm-util mail-prsvr mail-utils term/bobcat japan-util
tooltip eldoc electric uniquify ediff-hook vc-hooks lisp-float-type
mwheel dos-w32 ls-lisp disp-table term/w32-win w32-win w32-vars
term/common-win tool-bar dnd fontset image regexp-opt fringe
tabulated-list replace newcomment text-mode elisp-mode lisp-mode
prog-mode register page tab-bar menu-bar rfn-eshadow isearch timer
select scroll-bar mouse jit-lock font-lock syntax facemenu font-core
term/tty-colors frame minibuffer cl-generic cham georgian utf-8-lang
misc-lang vietnamese tibetan thai tai-viet lao korean japanese eucjp-ms
cp51932 hebrew greek romanian slovak czech european ethiopic indian
cyrillic chinese composite charscript charprop case-table epa-hook
jka-cmpr-hook help simple abbrev obarray cl-preloaded nadvice loaddefs
button faces cus-face macroexp files text-properties overlay sha1 md5
base64 format env code-pages mule custom widget hashtable-print-readable
backquote threads w32notify w32 lcms2 multi-tty make-network-process
emacs)

Memory information:
((conses 16 72462 17696)
 (symbols 48 7617 6)
 (strings 32 24070 1629)
 (string-bytes 1 713057)
 (vectors 16 13708)
 (vector-slots 8 242350 16328)
 (floats 8 47 208)
 (intervals 56 847 0)
 (buffers 1000 17))

Message #8 received at 46317 <at> debbugs.gnu.org (full text, mbox):

From: Eli Zaretskii <eliz <at> gnu.org>
To: ynyaaa <at> gmail.com
Cc: 46317 <at> debbugs.gnu.org
Subject: Re: bug#46317: 27.1;
 format may return string with wrong text property positions
Date: Sat, 06 Feb 2021 11:55:35 +0200

> From: ynyaaa <at> gmail.com
> Date: Fri, 05 Feb 2021 14:14:57 +0900
> 
> 
> The strings in the list retruned by the form below should have same text
> property positions. But for '%3s' and '%3S', strings have wrong text
> property positions.
> 
> (let ((s (propertize "X" 'prop "val")))
>   (list (format (concat "%3s/" s) 12)
>         (format (concat "%3S/" s) 12)
>         (format (concat "%3d/" s) 12)
>         (format (concat "%-3s/" s) 12)
>         (format (concat "%-3S/" s) 12)
>         (format (concat "%-3d/" s) 12)
>         ))
> =>(#(" 12/X" 1 2 (prop "val"))
>    #(" 12/X" 1 2 (prop "val"))
>    #(" 12/X" 4 5 (prop "val"))
>    #("12 /X" 4 5 (prop "val"))
>    #("12 /X" 4 5 (prop "val"))
>    #("12 /X" 4 5 (prop "val")))

Thanks, I hope I fixed this now on the master branch.

Message #11 received at 46317 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Eli Zaretskii <eliz <at> gnu.org>
Cc: ynyaaa <at> gmail.com, 46317 <at> debbugs.gnu.org
Subject: Re: bug#46317: 27.1; format may return string with wrong text
 property positions
Date: Thu, 16 Jun 2022 15:03:18 +0200

Eli Zaretskii <eliz <at> gnu.org> writes:

>> The strings in the list retruned by the form below should have same text
>> property positions. But for '%3s' and '%3S', strings have wrong text
>> property positions.

[...]

> Thanks, I hope I fixed this now on the master branch.

Works for me in Emacs 29, at least, so I'm closing this bug report now.

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.