From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Wolfgang Jenkner Newsgroups: gmane.emacs.bugs Subject: bug#20916: 25.0.50; [PATCH] Calc `s p' glitch Date: Sun, 28 Jun 2015 15:57:57 +0200 Message-ID: <85egkwylqb.fsf@iznogoud.viz> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1435500325 15233 80.91.229.3 (28 Jun 2015 14:05:25 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 28 Jun 2015 14:05:25 +0000 (UTC) To: 20916@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Jun 28 16:05:13 2015 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Z9DCq-0000Id-Hj for geb-bug-gnu-emacs@m.gmane.org; Sun, 28 Jun 2015 16:05:12 +0200 Original-Received: from localhost ([::1]:39085 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DCp-0001e3-MF for geb-bug-gnu-emacs@m.gmane.org; Sun, 28 Jun 2015 10:05:11 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:57530) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DCl-0001Zz-72 for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:05:08 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z9DCi-0004Go-1p for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:05:07 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:59034) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DCh-0004Ff-Tq for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:05:03 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1Z9DCh-0008NH-IS; Sun, 28 Jun 2015 10:05:03 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Wolfgang Jenkner Original-Sender: "Debbugs-submit" Resent-CC: jay.p.belanger@gmail.com, bug-gnu-emacs@gnu.org Resent-Date: Sun, 28 Jun 2015 14:05:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 20916 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-gnu-emacs@gnu.org X-Debbugs-Original-Xcc: Jay Belanger Original-Received: via spool by submit@debbugs.gnu.org id=B.143550026732138 (code B ref -1); Sun, 28 Jun 2015 14:05:03 +0000 Original-Received: (at submit) by debbugs.gnu.org; 28 Jun 2015 14:04:27 +0000 Original-Received: from localhost ([127.0.0.1]:60479 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Z9DC6-0008MG-66 for submit@debbugs.gnu.org; Sun, 28 Jun 2015 10:04:26 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:43821) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Z9DC4-0008M2-E9 for submit@debbugs.gnu.org; Sun, 28 Jun 2015 10:04:24 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z9DBy-000401-Dp for submit@debbugs.gnu.org; Sun, 28 Jun 2015 10:04:19 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:56715) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DBy-0003zx-BS for submit@debbugs.gnu.org; Sun, 28 Jun 2015 10:04:18 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:57325) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DBx-0001Uc-GN for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:04:18 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z9DBu-0003yV-Aa for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:04:17 -0400 Original-Received: from b2bfep12.mx.upcmail.net ([62.179.121.57]:43727) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z9DBu-0003yO-0d for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 10:04:14 -0400 Original-Received: from edge11.upcmail.net ([192.168.13.81]) by b2bfep16.mx.upcmail.net (InterMail vM.8.01.05.05 201-2260-151-110-20120111) with ESMTP id <20150628140208.IJUI21885.b2bfep16-int.chello.at@edge11.upcmail.net> for ; Sun, 28 Jun 2015 16:02:08 +0200 Original-Received: from iznogoud.viz ([91.119.85.218]) by edge11.upcmail.net with edge id lq2c1q00P4ieVW30Bq2c74; Sun, 28 Jun 2015 16:02:36 +0200 X-SourceIP: 91.119.85.218 Original-Received: from wolfgang by iznogoud.viz with local (Exim 4.85 (FreeBSD)) (envelope-from ) id 1Z9DAK-00038f-7V for bug-gnu-emacs@gnu.org; Sun, 28 Jun 2015 16:02:36 +0200 User-Agent: Gnus/5.130014 (Ma Gnus v0.14) Emacs/25.0.50 (berkeley-unix) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.43 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.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:104432 Archived-At: May I push the following patch? -- >8 -- >From 4c78b6aa26675f980d37fca7c0924f5219a4edb6 Mon Sep 17 00:00:00 2001 From: Wolfgang Jenkner Date: Sun, 28 Jun 2015 15:46:57 +0200 Subject: [PATCH] * lisp/calc-store.el (calc-insert-permanent-variable): Heed case. Otherwise `s p' of f and F will stomp on each other's value. --- lisp/calc/calc-store.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/calc/calc-store.el b/lisp/calc/calc-store.el index 11bf964..91b927a 100644 --- a/lisp/calc/calc-store.el +++ b/lisp/calc/calc-store.el @@ -609,7 +609,8 @@ (defun calc-insert-permanent-variable (var) (goto-char (point-min)) - (if (search-forward (concat "(setq " (symbol-name var) " '") nil t) + (if (let (case-fold-search) + (search-forward (concat "(setq " (symbol-name var) " '") nil t)) (progn (setq calc-pv-pos (point-marker)) (forward-line -1) -- 2.4.2