bug#17446: 24.4.50; What is the situation around `called-interactively-p'?

[Michael Heerdegen]

Hi,

my last question was: should `repeat-complex-command' set
`this-command'?  See my example.  If the answer is "yes" - shall I
create a separate bug report?


Thanks,

Michael.



> Example:
>
> (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)
>
> 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?