From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Michael Heerdegen Newsgroups: gmane.emacs.bugs Subject: bug#53507: bug#46092: bug#53507: 27.1; syntax highlight in the eval-expression prompt Date: Wed, 26 Jan 2022 17:39:44 +0100 Message-ID: <87bkzyqwmn.fsf@web.de> References: <87fspcx9hz.fsf@gnus.org> <87fspbqrkb.fsf@web.de> <871r0usgnd.fsf@gnus.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="16637"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) Cc: ndame , "46092@debbugs.gnu.org" <46092@debbugs.gnu.org>, 53507@debbugs.gnu.org To: Lars Ingebrigtsen Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Wed Jan 26 17:41:55 2022 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 1nClMo-00048E-Ih for geb-bug-gnu-emacs@m.gmane-mx.org; Wed, 26 Jan 2022 17:41:54 +0100 Original-Received: from localhost ([::1]:52454 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1nClMn-0003EJ-0W for geb-bug-gnu-emacs@m.gmane-mx.org; Wed, 26 Jan 2022 11:41:53 -0500 Original-Received: from eggs.gnu.org ([209.51.188.92]:60384) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nClM5-0003Bs-Qz for bug-gnu-emacs@gnu.org; Wed, 26 Jan 2022 11:41:11 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:60369) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1nClLy-0004wC-Hs for bug-gnu-emacs@gnu.org; Wed, 26 Jan 2022 11:41:05 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1nClLy-0002kx-H7 for bug-gnu-emacs@gnu.org; Wed, 26 Jan 2022 11:41:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Michael Heerdegen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 26 Jan 2022 16:41:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 53507 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: moreinfo Original-Received: via spool by 53507-submit@debbugs.gnu.org id=B53507.164321520510438 (code B ref 53507); Wed, 26 Jan 2022 16:41:02 +0000 Original-Received: (at 53507) by debbugs.gnu.org; 26 Jan 2022 16:40:05 +0000 Original-Received: from localhost ([127.0.0.1]:53271 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nClL2-0002i6-G9 for submit@debbugs.gnu.org; Wed, 26 Jan 2022 11:40:05 -0500 Original-Received: from mout.web.de ([212.227.15.3]:48689) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nClKs-0002ge-1t; Wed, 26 Jan 2022 11:40:01 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=web.de; s=dbaedf251592; t=1643215186; bh=x3qaLoZ09+1+Af9v/iOQ1b5Pwt+//Zho0yjNXMavsfU=; h=X-UI-Sender-Class:From:To:Cc:Subject:References:Date:In-Reply-To; b=Wucsovlkadc+VIrKm+vW4yFSw1WHNEl+SnnRLGMPSWXjfHpd76W9RKCRWhDfvVcu0 J6tFGSHRpCGbBZ6RCVJ6B7ay2fNiEFhu4RsSkqGKiC4JHgtCagjQnT9Sj3bfRSOVQA HqS0PpKz5th1dqex69irTQ8uarmIU6ros8KyaJn4= X-UI-Sender-Class: c548c8c5-30a9-4db5-a2e7-cb6cb037b8f9 Original-Received: from drachen.dragon ([88.66.201.186]) by smtp.web.de (mrweb005 [213.165.67.108]) with ESMTPSA (Nemesis) id 1Mvbik-1mNgut3Nxu-00ss0P; Wed, 26 Jan 2022 17:39:45 +0100 In-Reply-To: <871r0usgnd.fsf@gnus.org> (Lars Ingebrigtsen's message of "Wed, 26 Jan 2022 15:41:58 +0100") X-Provags-ID: V03:K1:/uZrU2dnMKhSrS0ev7qoRkv3sBIAb6HhJV8+czIPyKQ1auvBfsf 5gTRnNOLdEsZaO1MVeVnyJbLpyyih/3sVpsTz5C+WqWsUOkkoCqrwI3QPGgVKFCg9REs6gj 0Eey7WG8kwbj9Gi9t19J2T4hVdrTdQyEN+FsOM630Dlf/2jlzUSGd0tuO2exiFc28yk51NS vQFTCoZE0XXHWyFKoaipQ== X-UI-Out-Filterresults: notjunk:1;V03:K0:uWrP6FEskkg=:+r/4mMQXkV/2j9uVYJawSo xHRmwu/3FadsklSvgJ09kOwwW+v37347meh7sqYKcDa/kLAlfyoit6zMyKigiNBhFtQNtHl7F BeJza/udkqnnc9wsnhKXggrA2MSsWc/Hs9Zrou2JWp0aqa58i7JvgV8YM/bwpAVGySPlam7qt Qk75yor0hLsCcZ3NIKGS+WxVcHOH2YVbdvC8QwYadMneIPLJi6Ktntt+dFVvqlD1BBy3Qg+3U Ya3mhzvlEiRPZ9UvnPqrCTSra2/Vj2pW/01Wz/iTFY0zWbhjQbwt5oMTRwUOOKgI0p3KJYBBw 9t/PxdaowSkJyKmZJvUBvFUtKFkkQAs8Tp3A7vKE67KJD/4YdqieQzOhogfa/QrJDRTTgKT0L tTFaB/T3Z3tY1bhY7Hr285T/oyUzFTFHWsJ3I3vBxNtIjFa1Jbzb/5VUGdDGm6OJ0A0rbyFSu BCDLNIWgCiV5YVsCLgng4sYDGENEa0mbwTV9wZsHC2oazXriT2Ulcb0A/7YoSisxe4Yw3lvTT mWiIWXP0F7OfDRZLoqZVmjSk8+Mi8PMcbqwLvCX188RajiC8M5XOUxM5GeVJXFejx4ahhc2pr 2atdLe6yCWQu0UMhHDPsZTciSgSPc3UBMWsTK18DImCUPqnj4DODG8QU71dOEK+v2cKqnAWP3 tPvrbH86IKJoPz+SJ7K9JNKXNnFiFqST5bUgEeDKdSX0MY2jN0PKK400wWB2uHVzY6xjKQbX9 muQUSilQ5qZatmJklGMh6ibgbRXZ4In9GoR8Hhehyq52ub/4qkc+LRgAG+738EuwPxfDhLjq 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:225284 Archived-At: --=-=-= Content-Type: text/plain Lars Ingebrigtsen writes: > > Do we want to support syntax highlighting in eval-expression by default? > > I would vote for it. > > I think that might be nice, but I'd have to see how it works in practice > first. Privately I am using a hack like this for quite a while: --=-=-= Content-Type: application/emacs-lisp Content-Disposition: inline; filename=read-expr.el Content-Transfer-Encoding: quoted-printable ;; -*- lexical-binding: t -*- (defvar my-read-expression-map (let ((map (make-sparse-keymap))) (set-keymap-parent map read-expression-map) (define-key map "\C-g" #'abort-minibuffers) (define-key map [up] nil) (define-key map [down] nil) (define-key map "\C-j" #'newline) (define-key map "\r" #'exit-minibuffer) (define-key map "\n" #'exit-minibuffer) map)) (defun my-read-expression (prompt &optional initial-contents hist default read map) "Like `read-expression' but using emacs-lisp-mode like minibuffer." (minibuffer-with-setup-hook #'my-read-expression-setup-minibuffer (read-from-minibuffer prompt initial-contents (or map my-read-expression-map) read (or hist 'read-expression-history) default))) (defun my-read-expression-setup-minibuffer () (let ((inhibit-read-only t)) ;; Without this the prompt would be painted like code (put-text-property 1 (minibuffer-prompt-end) 'font-lock-face 'minibuffe= r-prompt)) (emacs-lisp-mode) (use-local-map my-read-expression-map) (setq font-lock-mode t) (funcall font-lock-function 1) (goto-char (minibuffer-prompt-end)) (when (looking-at ".*\n") (indent-sexp)) (goto-char (point-max))) --=-=-= Content-Type: text/plain and I am quite happy with it. Michael. --=-=-=--