From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Michael Heerdegen Newsgroups: gmane.emacs.bugs Subject: bug#17446: 24.4.50; What is the situation around `called-interactively-p'? Date: Sun, 11 May 2014 07:58:08 +0200 Message-ID: <878uq8luvj.fsf@web.de> References: <87tx8z6sp2.fsf@gmail.com> <819a6ab8-db8e-4176-a778-02218f08e7af@default> <6e5610f3-d741-4d61-903c-a8f3aa8f46fd@default> <87siojasqx.fsf@web.de> <87r442x00n.fsf@gmail.com> <87bnv6mba5.fsf@gmail.com> <87r442f46r.fsf@gmail.com> <87siohx7rg.fsf@web.de> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1399787969 1913 80.91.229.3 (11 May 2014 05:59:29 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 11 May 2014 05:59:29 +0000 (UTC) Cc: 17446@debbugs.gnu.org, Thierry Volpiatto To: Stefan Monnier Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun May 11 07:59:21 2014 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 1WjMnA-0006kj-1w for geb-bug-gnu-emacs@m.gmane.org; Sun, 11 May 2014 07:59:20 +0200 Original-Received: from localhost ([::1]:59922 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WjMn9-0006La-Iu for geb-bug-gnu-emacs@m.gmane.org; Sun, 11 May 2014 01:59:19 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:40337) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WjMmz-0006LJ-OJ for bug-gnu-emacs@gnu.org; Sun, 11 May 2014 01:59:17 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1WjMms-0006lT-9E for bug-gnu-emacs@gnu.org; Sun, 11 May 2014 01:59:09 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:41346) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WjMms-0006lP-5k for bug-gnu-emacs@gnu.org; Sun, 11 May 2014 01:59:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1WjMmr-0004I4-Su for bug-gnu-emacs@gnu.org; Sun, 11 May 2014 01:59:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Michael Heerdegen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 11 May 2014 05:59:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 17446 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 17446-submit@debbugs.gnu.org id=B17446.139978790716443 (code B ref 17446); Sun, 11 May 2014 05:59:01 +0000 Original-Received: (at 17446) by debbugs.gnu.org; 11 May 2014 05:58:27 +0000 Original-Received: from localhost ([127.0.0.1]:58697 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WjMmJ-0004H9-1T for submit@debbugs.gnu.org; Sun, 11 May 2014 01:58:27 -0400 Original-Received: from mout.web.de ([212.227.15.14]:55637) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WjMmG-0004Gr-TM for 17446@debbugs.gnu.org; Sun, 11 May 2014 01:58:25 -0400 Original-Received: from drachen.dragon ([90.186.181.129]) by smtp.web.de (mrweb103) with ESMTPSA (Nemesis) id 0MN4Oy-1WlYcz250K-006hvj; Sun, 11 May 2014 07:58:18 +0200 In-Reply-To: <87siohx7rg.fsf@web.de> (Michael Heerdegen's message of "Sun, 11 May 2014 06:24:19 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.90 (gnu/linux) X-Provags-ID: V03:K0:A4XQ1YErPuuvusCU/iOX6WBiBYD7/QattusNc4m1WGDWARPAvMg Ir9peu/rT+m4EM4JWkY8TPTpiLA9SuECVRlvnISD16xB6WqHSSxrXH/ZL/Y4XyPpgOH4hKh iDrPuWccHV0NBvvwgOeJvgY5bUZ0eKkM/cFP0Sbf2NTJnF/+TpWV6SSMVtmMMbWSF/BReV3 bj7D6XgGcwLJ8MCKhyhBw== 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:88886 Archived-At: Michael Heerdegen writes: > (when (symbolp fun) (setq this-command fun)) ? call-interactively doesn't set `this-command'. Nor does `repeat-complex-command'. Should one of them set it? Example: --8<---------------cut here---------------start------------->8--- (defvar the-string nil) (defun test (string) (interactive (list (if (eq this-command last-command) the-string (setq the-string (read-string "Enter string: "))))) (message (concat "You " (if (eq this-command last-command) "had" "have") " entered " the-string))) (global-set-key [f12] #'test) --8<---------------cut here---------------end--------------->8--- If you repeat `test' via repeat-complex-command and hit f12 after that, it doesn't behave as expected (i.e., message "You had entered ..."). Should it? Michael.