From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Eli Zaretskii Newsgroups: gmane.emacs.bugs Subject: bug#48740: 28.0.50; Composition text property is not always honoured Date: Tue, 01 Jun 2021 19:25:04 +0300 Message-ID: <83r1hlzh5r.fsf@gnu.org> References: <87im30ad2g.fsf@localhost> <837djg4gvq.fsf@gnu.org> <87wnrgtlln.fsf@localhost> <8335u449de.fsf@gnu.org> <87pmx8tfub.fsf@localhost> <83y2bw2oyr.fsf@gnu.org> <87eedn12j6.fsf@localhost> <835yyz2ctp.fsf@gnu.org> <878s3tbqvx.fsf@localhost> <83wnrdzjxe.fsf@gnu.org> Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="27099"; mail-complaints-to="usenet@ciao.gmane.io" Cc: 48740@debbugs.gnu.org To: yantar92@gmail.com Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Tue Jun 01 18:26:19 2021 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1lo7Df-0006pe-5J for geb-bug-gnu-emacs@m.gmane-mx.org; Tue, 01 Jun 2021 18:26:19 +0200 Original-Received: from localhost ([::1]:37622 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lo7De-00089W-7i for geb-bug-gnu-emacs@m.gmane-mx.org; Tue, 01 Jun 2021 12:26:18 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:39204) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lo7DR-0007sL-GS for bug-gnu-emacs@gnu.org; Tue, 01 Jun 2021 12:26:05 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:54360) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lo7DO-0001gd-3c for bug-gnu-emacs@gnu.org; Tue, 01 Jun 2021 12:26:03 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lo7DN-0000bx-VD for bug-gnu-emacs@gnu.org; Tue, 01 Jun 2021 12:26:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Eli Zaretskii Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Tue, 01 Jun 2021 16:26:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 48740 X-GNU-PR-Package: emacs Original-Received: via spool by 48740-submit@debbugs.gnu.org id=B48740.16225647282276 (code B ref 48740); Tue, 01 Jun 2021 16:26:01 +0000 Original-Received: (at 48740) by debbugs.gnu.org; 1 Jun 2021 16:25:28 +0000 Original-Received: from localhost ([127.0.0.1]:37672 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lo7Cp-0000ad-RC for submit@debbugs.gnu.org; Tue, 01 Jun 2021 12:25:28 -0400 Original-Received: from eggs.gnu.org ([209.51.188.92]:45362) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lo7Cn-0000aK-H7 for 48740@debbugs.gnu.org; Tue, 01 Jun 2021 12:25:26 -0400 Original-Received: from fencepost.gnu.org ([2001:470:142:3::e]:35500) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lo7Ci-00019q-47; Tue, 01 Jun 2021 12:25:20 -0400 Original-Received: from 84.94.185.95.cable.012.net.il ([84.94.185.95]:2554 helo=home-c4e4a596f7) by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lo7Ch-0005id-Gn; Tue, 01 Jun 2021 12:25:19 -0400 In-Reply-To: <83wnrdzjxe.fsf@gnu.org> (message from Eli Zaretskii on Tue, 01 Jun 2021 18:25:17 +0300) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:207799 Archived-At: > Date: Tue, 01 Jun 2021 18:25:17 +0300 > From: Eli Zaretskii > Cc: 48740@debbugs.gnu.org > > I don't know why the values of the 'composition' property become not > 'eq'; perhaps some code does a copy-sequence or something? Btw, looking closer at the plist of the interval after org-agenda-redo-all, I see that it is quite a mess. For example, the 'composition' property appears there several times, not just once. Here's the full value of the interval's plist that I see in the debugger in Step 6: (org-heading t fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face org-todo org-category "inbox" tags (#("SKIP" 0 4 (inherited t)) #("INBOX" 0 5 (inherited t)) #("BOOKMARK" 0 8 (org-category "inbox" keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) fontified t)) #("misc" 0 4 (org-category "inbox" keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) fontified t))) org-priority-highest 65 org-priority-lowest 67 time-of-day nil duration nil breadcrumbs nil txt #("TODO belluzj [Github] belluzj/fantas que-sans: A font family with a great monospaced variant for programmers. :SKIP:INBOX::BOOKMARK:misc:" 0 4 (fontified t face (org-todo org-level-1) org-category "inbox" org-heading t) 4 108 (fontified t face org-level-1 org-category "inbox" org-heading t) 108 110 (org-heading t) 110 114 (inherited t org-heading t) 114 115 (org-heading t) 115 120 (inherited t org-heading t) 120 122 (org-heading t) 122 130 (org-category "inbox" keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) fontified t org-heading t) 130 131 (org-heading t) 131 135 (fontified t face (org-tag org-level-1) mouse-face highlight keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-o pen-at-mouse)) org-category "inbox" org-heading t) 135 136 (org-heading t)) level "" time "" extra "" format (((org-prefix-has-time nil) (org-prefix-has-tag nil) (org-prefix-category-length 12) (org-prefix-has-effort nil) (org-prefix-has-breadcrumbs nil)) (format " %s %s" (format "%s" (if (member category-icon '("" nil)) "" (concat category-icon "" (get-text-property 0 'extra-space category-icon)))) (format "%-12s" (if (member category '("" nil)) "" (concat category ":" (get-text-property 0 'extra-space category)))))) dotime t org-series-cmd nil org-redo-cmd (org-todo-list (or (and (numberp current-prefix-arg) current-prefix-arg) nil current-prefix-arg nil)) org-last-args nil org-agenda-type todo done-face org-agenda-done org-not-done-regexp "\\(DOING\\|HOLD\\|ONGOING\\|REVIEW\\|SOMEDAY\ \|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)" org-todo-regexp "\\(CANCELLED\\|DO\\(?:ING\\|NE\\)\\|F\\(?:AILED\\|ROZEN\\)\\|HOLD\\|MERGED\\|ONGOING\\|REVIEW\\|SOMEDAY\\|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)" org-complex-heading-regexp "^\\(\\*+\\)\\(?: +\\(CANCELLED\\|DO\\(?:ING\\|NE\\)\\|F\\(?:AILED\\|ROZEN\\)\\|HOLD\\|MERGED\\|ONGOING\\|REVIEW\\|SOMEDAY\\|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)\\)?\\(?: +\\(\\[#.\\]\\)\\)?\\(?: +\\(.*?\\)\\)??\\(?:[ ]+\\(:[[:alnum:]_@#%:]+:\\)\\)?[ ]*$" mouse-face highlight help-echo "mouse-2 or RET jump to org file ~/data/test-org/inbox.org" org-marker # org-hd-marker # priority 1001 ts-date nil type "todo" todo-state #("TODO" 0 4 (fontified t face (org-todo org-level-1) org-category "inbox"))) And here's the value in Step 8: (org-series-cmd nil org-redo-cmd (org-todo-list (or (and (numberp current-prefix-arg) current-prefix-arg) nil current-prefix-arg nil)) org-last-args nil org-agenda-type todo todo-state #("ONGOING" 0 3 (fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face (org-todo org-level-1) org-category "inbox") 3 7 (fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face (org-todo org-level-1) org-category "inbox")) type "todo" ts-date nil priority 1001 org-hd-marker # org-marker # help-echo "mouse-2 or RET jump to org file ~/data /test-org/inbox.org" mouse-face highlight org-complex-heading-regexp "^\\(\\*+\\)\\(?: +\\(CANCELLED\\|DO\\(?:ING\\|NE\\)\\|F\\(?:AILED\\|ROZEN\\)\\|HOLD\\|MERGED\\|ONGOING\\|REVIEW\\|SOMEDAY\\|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)\\)?\\(?: +\\(\\[#.\\]\\)\\)?\\(?: +\\(.*?\\)\\)??\\(?:[ ]+\\(:[[:alnum:]_@#%:]+:\\)\\)?[ ]*$" org-todo-regexp "\\(CANCELLED\\|DO\\(?:ING\\|NE\\)\\|F\\(?:AILED\\|ROZEN\\)\\|HOLD\\|MERGED\\|ONGOING\\|REVIEW\\|SOMEDAY\\|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)" org-not-done-regexp "\\(DOING\\|HOLD\\|ONGOING\\|REVIEW\\|SOMEDAY\\|T\\(?:ICKLER\\|ODO\\)\\|WAITING\\)" done-face org-agenda-done dotime t format (((org-prefix-has-time nil) (org-prefix-has-tag nil) (org-prefix-category-length 12) (org-prefix-has-effort nil) (org-prefix-has-breadcrumbs nil)) (format " %s %s" (format "%s" (if (member category-icon '("" nil)) "" (concat category-icon "" (get-text-property 0 'extra-space category-icon)))) (format "%-12s" (if (member category '("" nil)) "" (concat category ":" (get-text-property 0 'extra-space category)))))) extra "" time "" level " " txt #("ONGOING belluzj [Github] belluzj/fantas que-sans: A font family with a great monospaced variant for programmers. :SKIP:INBOX::BOOKMARK:misc:" 0 3 (fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face (org-todo org-level-1) org-category "inbox" org-heading t) 3 7 (fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face (org-todo org-level-1) org-category "inbox" org-heading t) 7 8 (fontified t org-todo-head #("TODO" 0 4 (face org-todo)) face org-level-1 org-category "inbox" org-heading t) 8 111 (fontified t org-category "inbox" org-todo-head #("TODO" 0 4 (face org-todo)) face org-level-1 org-heading t) 111 113 (org-heading t) 113 117 (inherited t org-heading t ) 117 118 (org-heading t) 118 123 (inherited t org-heading t) 123 125 (org-heading t) 125 133 (keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) org-todo-head #("TODO" 0 4 (face org-todo)) org-category "inbox" fontified t org-heading t) 133 134 (org-heading t) 134 138 (fontified t org-category "inbox" org-todo-head #("TODO" 0 4 (face org-todo)) face (org-tag org-level-1) mouse-face highlight keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) org-heading t) 138 139 (org-heading t)) breadcrumbs nil duration nil time-of-day nil org-priority-lowest 67 org-priority-highest 65 tags (#("SKIP" 0 4 (inherited t)) #("INBOX" 0 5 (inherite d t)) #("BOOKMARK" 0 8 (keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) org-todo-head #("TODO" 0 4 (face org-todo)) org-category "inbox" fontified t)) #("misc" 0 4 (keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)) mouse-face highlight face (org-tag org-level-1) org-todo-head #("TODO" 0 4 (face org-todo)) org-category "inbox" fontified t))) fontified t org-todo-head #("TODO" 0 4 (face org-todo)) composition (0 7 [128119]) prettify-symbols-start 294 prettify-symbols-end 301 face org-todo org-category "inbox" org-heading t) As you see, the 'composition' property appears only once in Step 6, but 5 times in Step 8. This is probably part of the problem, or at least its symptom.