From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Robert Pluim Newsgroups: gmane.emacs.bugs Subject: bug#63837: 29.0.91; delete-forward-char error with composed text Date: Fri, 02 Jun 2023 14:05:17 +0200 Message-ID: <87jzwm9iiq.fsf@gmail.com> References: Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="31770"; mail-complaints-to="usenet@ciao.gmane.io" Cc: 63837@debbugs.gnu.org To: Thiago Melo Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Fri Jun 02 14:06:21 2023 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 1q53Xx-00085j-Gu for geb-bug-gnu-emacs@m.gmane-mx.org; Fri, 02 Jun 2023 14:06:21 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1q53Xj-0002T8-CV; Fri, 02 Jun 2023 08:06:07 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q53Xe-0002Nm-NU for bug-gnu-emacs@gnu.org; Fri, 02 Jun 2023 08:06:03 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1q53Xe-0003Aa-DI for bug-gnu-emacs@gnu.org; Fri, 02 Jun 2023 08:06:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1q53Xe-0001xD-8f for bug-gnu-emacs@gnu.org; Fri, 02 Jun 2023 08:06:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Robert Pluim Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 02 Jun 2023 12:06:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 63837 X-GNU-PR-Package: emacs Original-Received: via spool by 63837-submit@debbugs.gnu.org id=B63837.16857075297462 (code B ref 63837); Fri, 02 Jun 2023 12:06:02 +0000 Original-Received: (at 63837) by debbugs.gnu.org; 2 Jun 2023 12:05:29 +0000 Original-Received: from localhost ([127.0.0.1]:39215 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q53X6-0001wG-Hl for submit@debbugs.gnu.org; Fri, 02 Jun 2023 08:05:28 -0400 Original-Received: from mail-wr1-f48.google.com ([209.85.221.48]:61559) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q53X3-0001vy-7Q for 63837@debbugs.gnu.org; Fri, 02 Jun 2023 08:05:25 -0400 Original-Received: by mail-wr1-f48.google.com with SMTP id ffacd0b85a97d-3090d3e9c92so1939233f8f.2 for <63837@debbugs.gnu.org>; Fri, 02 Jun 2023 05:05:25 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1685707519; x=1688299519; h=mime-version:message-id:date:references:in-reply-to:subject:cc:to :from:from:to:cc:subject:date:message-id:reply-to; bh=ShN+RbYW3InIsRaaYvtAeG5IYO8T6aHaI2lRx3HGEtw=; b=SRvywu6YWeO1VdL5ECmSbcBGcA+CKqQHmnpJry94s2hXwNbk/MscUdCp1CHsm6bCbu kgUOcuZY07vOngFQu++eUkaC2Ao7WQKSN/rxDFUC/B7kzdJTDqKj33hPbNVrLT5eIiEN jLrw3c48dbeXr8dYzQVZ+8q/GmYt/g9Z9TjTHn5pMuJgnFNucrFLHdnJZG2wNYBgipRp A+Nu9NhEezCL4H/w2QpKrHDuhhbaMQJimI0Fbm5T+yX6ZlmldgF4VH63h487fqOuri4P CyBFBlARllWXUkRc39UTu+jy53Fn4nU8i44gAocZ5BhgeIzgILdtZO7tg4UCm6x0DHbb uFDQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20221208; t=1685707519; x=1688299519; h=mime-version:message-id:date:references:in-reply-to:subject:cc:to :from:x-gm-message-state:from:to:cc:subject:date:message-id:reply-to; bh=ShN+RbYW3InIsRaaYvtAeG5IYO8T6aHaI2lRx3HGEtw=; b=dRCxtMMBg96PZ4eqYatL97bezEf8bI1goaFCBAI6MkwpB2uV0tPd1ztjf5t7wgLy6O hFtMr+nq6mSlw9Vv/YXLsj2vYOlRmFLEC+AnHlr3hIwGO1GkiIvuAeJvqtZUk/GoYhsY 7zrT6OgF8cOVZ63UqoUEpmII0RIRBkie40td39ZHexe57Rb0RXTvjigzE0QPSzzsWZup WtsFZ6Kd+iVIaijdkDkBeVZKPgpFHB3cpWn1jE7qTboJEGTADeaHXQ/SwNhVCbRs+bR6 jgYmKXKL7VLN0Oo4CFaKrzCSmuTA+JXDBzZiOdSM0Af0a1o5mGGIJemwSjN3Xdr/9Yw3 TqpQ== X-Gm-Message-State: AC+VfDz+eY0kIuImPl3lxFtWzVG8nUr2eaoA27MtP7FO2twb98yDxqcM ff0RgFCYAU58o/2ag+08zxjPxAO24rk= X-Google-Smtp-Source: ACHHUZ4/a2dRuSGcRntOSO1JWbeGWPALDNp+KEMzB4pgoMKsh8wDqlgpr27q34WvtHKT9+x0SWUynA== X-Received: by 2002:adf:de0c:0:b0:307:82e3:70cd with SMTP id b12-20020adfde0c000000b0030782e370cdmr4727897wrm.14.1685707518583; Fri, 02 Jun 2023 05:05:18 -0700 (PDT) Original-Received: from rltb ([82.66.8.55]) by smtp.gmail.com with ESMTPSA id j11-20020a5d564b000000b00307c8d6b4a0sm1529460wrw.26.2023.06.02.05.05.17 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 02 Jun 2023 05:05:18 -0700 (PDT) In-Reply-To: (Thiago Melo's message of "Fri, 2 Jun 2023 10:42:29 +0000") 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-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:262754 Archived-At: >>>>> On Fri, 2 Jun 2023 10:42:29 +0000, Thiago Melo said: Thiago> * How to reproduce: Thiago> 0. Start emacs with `emacs -Q' Thiago> 1. Create some text composition, e.g. eval: `(insert (compose-chars ?+))' Thiago> 2. Move cursor to before composed character Thiago> 3. `M-x delete-forward-char' or press key Thiago> * Backtrace: Thiago> Debugger entered--Lisp error: (wrong-type-argument sequencep t) Thiago> lgstring-glyph-boundary(t 1 2) Thiago> delete-forward-char(1 nil) Thiago> funcall-interactively(delete-forward-char 1 nil) Thiago> call-interactively(delete-forward-char nil nil) Thiago> command-execute(delete-forward-char) How about this (for master, since your example is somewhat contrived :-)) diff --git a/lisp/simple.el b/lisp/simple.el index 3f88fcb8d03..efe6895fabc 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1527,9 +1527,11 @@ delete-forward-char ;; character. ((<= to pos) (1+ pos)) - (t + ((vectorp (nth 2 cmp)) (lgstring-glyph-boundary (nth 2 cmp) - from (1+ pos))))) + from (1+ pos))) + (t + (1+ pos)))) (1+ pos))) (setq n (1- n))) (delete-char (- pos start) killflag))) Robert --