From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from lists.gentoo.org (pigeon.gentoo.org [208.92.234.80]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits)) (No client certificate requested) by finch.gentoo.org (Postfix) with ESMTPS id 6F56515808B for ; Mon, 28 Mar 2022 13:42:25 +0000 (UTC) Received: from pigeon.gentoo.org (localhost [127.0.0.1]) by pigeon.gentoo.org (Postfix) with SMTP id 90D6EE0954; Mon, 28 Mar 2022 13:42:24 +0000 (UTC) Received: from smtp.gentoo.org (woodpecker.gentoo.org [140.211.166.183]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256) (No client certificate requested) by pigeon.gentoo.org (Postfix) with ESMTPS id E6C21E08C8 for ; Mon, 28 Mar 2022 13:42:23 +0000 (UTC) Received: from oystercatcher.gentoo.org (oystercatcher.gentoo.org [148.251.78.52]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256) (No client certificate requested) by smtp.gentoo.org (Postfix) with ESMTPS id 701313412D4 for ; Mon, 28 Mar 2022 13:42:22 +0000 (UTC) Received: from localhost.localdomain (localhost [IPv6:::1]) by oystercatcher.gentoo.org (Postfix) with ESMTP id BC9C232C for ; Mon, 28 Mar 2022 13:42:20 +0000 (UTC) From: "Mark Wright" To: gentoo-commits@lists.gentoo.org Content-Transfer-Encoding: 8bit Content-type: text/plain; charset=UTF-8 Reply-To: gentoo-dev@lists.gentoo.org, "Mark Wright" Message-ID: <1648474934.6c2708dd89c8d5b69db1bb9d97d499705762076a.gienah@gentoo> Subject: [gentoo-commits] repo/gentoo:master commit in: sci-mathematics/twelf/files/ X-VCS-Repository: repo/gentoo X-VCS-Files: sci-mathematics/twelf/files/twelf-1.7.1-emacs-fix-old-style-backquotes-p3.patch X-VCS-Directories: sci-mathematics/twelf/files/ X-VCS-Committer: gienah X-VCS-Committer-Name: Mark Wright X-VCS-Revision: 6c2708dd89c8d5b69db1bb9d97d499705762076a X-VCS-Branch: master Date: Mon, 28 Mar 2022 13:42:20 +0000 (UTC) Precedence: bulk List-Post: List-Help: List-Unsubscribe: List-Subscribe: List-Id: Gentoo Linux mail X-BeenThere: gentoo-commits@lists.gentoo.org X-Auto-Response-Suppress: DR, RN, NRN, OOF, AutoReply X-Archives-Salt: 46b1dcb0-cb00-4451-9a06-b9dd14231cef X-Archives-Hash: 2348c223d9807730d4d881ae41c14938 commit: 6c2708dd89c8d5b69db1bb9d97d499705762076a Author: Mark Wright gentoo org> AuthorDate: Mon Mar 28 13:40:59 2022 +0000 Commit: Mark Wright gentoo org> CommitDate: Mon Mar 28 13:42:14 2022 +0000 URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=6c2708dd sci-mathematics/twelf: Thanks to Jouni Kosonen for backquotes fix. Thanks to Agostino Sarubbo and Sam James for reporting and helping. Apply patch by Jouni Kosonen to fix old-style emacs backquotes. Closes: https://bugs.gentoo.org/836270 Package-Manager: Portage-3.0.30, Repoman-3.0.3 Signed-off-by: Mark Wright gentoo.org> ...f-1.7.1-emacs-fix-old-style-backquotes-p3.patch | 23 ++++++++++++++++++---- 1 file changed, 19 insertions(+), 4 deletions(-) diff --git a/sci-mathematics/twelf/files/twelf-1.7.1-emacs-fix-old-style-backquotes-p3.patch b/sci-mathematics/twelf/files/twelf-1.7.1-emacs-fix-old-style-backquotes-p3.patch index b5f13b114456..e15d838942e7 100644 --- a/sci-mathematics/twelf/files/twelf-1.7.1-emacs-fix-old-style-backquotes-p3.patch +++ b/sci-mathematics/twelf/files/twelf-1.7.1-emacs-fix-old-style-backquotes-p3.patch @@ -1,13 +1,28 @@ diff --git a/emacs/auc-menu.el b/emacs/auc-menu.el -index f6483b0..602c6fc 100644 +index f6483b0..80fe660 100644 --- a/emacs/auc-menu.el +++ b/emacs/auc-menu.el -@@ -92,7 +92,7 @@ +@@ -92,10 +92,10 @@ (defmacro easy-menu-define (symbol maps doc menu) "Define SYMBOL to be a menu for keymaps MAPS. DOC is the documentation string, and MENU is a Lucid style menu." - (` (progn -+ `( (progn ++ `(progn (require 'auc-menu) ;For `easy-menu-do-define'. (defvar (, symbol) nil (, doc)) - (easy-menu-do-define (quote (, symbol)) (, maps) (, doc) (, menu))))) +- (easy-menu-do-define (quote (, symbol)) (, maps) (, doc) (, menu))))) ++ (easy-menu-do-define (quote (, symbol)) (, maps) (, doc) (, menu)))) + + (cond + +@@ -212,8 +212,8 @@ DOC is the documentation string, and MENU is a Lucid style menu." + + (defun easy-menu-do-define (symbol maps doc menu) + (set symbol (easy-menu-create-keymaps (car menu) (cdr menu))) +- (fset symbol (` (lambda (event) (, doc) (interactive "@e") +- (easy-popup-menu event (, symbol))))) ++ (fset symbol `(lambda (event) (, doc) (interactive "@e") ++ (easy-popup-menu event (, symbol)))) + (mapcar (function (lambda (map) + (define-key map (vector 'menu-bar (intern (car menu))) + (cons (car menu) (symbol-value symbol)))))