The problem turns out to be that vm-save-message-to-local-folder is actually being called indirectly (and somehow I was mistaken about testing it directly), so the call to interactive-p should return nil, and this is a VM bug.
On Jan 4, 11:01 am, "[EMAIL PROTECTED]" <[EMAIL PROTECTED]> wrote: > Oops, the link for the URL of vm-save.el isn't usable, due to > the text following it. Here it is again: > > http://people.cis.ksu.edu/~stough/vm-save.el > > On Jan 4, 10:57 am, "[EMAIL PROTECTED]" <[EMAIL PROTECTED]> wrote: > > > I have a question about the behavior of the interactive-p function. > > It's in the context of VM (http://www.nongnu.org/viewmail/) and Carbon > > Emacs (http://homepage.mac.com/zenitani/emacs-e.html), but I don't > > think it's specific to either. > > > When I upgraded to version 1.6.0 of Carbon Emacs, which is based on > > GNU Emacs version 22.1.50.1, I noticed that my setting of vm-confirm- > > new-folders to t was being ignored. I traced this down to lines > > 281-286 of the definition of vm-save-message-to-local-folder in vm- > > save.el > > (http://people.cis.ksu.edu/~stough/vm-save.el): > > > (if (and vm-confirm-new-folders (interactive-p) > > (not (file-exists-p folder)) > > (or (not vm-visit-when-saving) (not (vm-get-file-buffer > > folder))) > > (not (y-or-n-p (format "%s does not exist, save there > > anyway? " > > folder)))) > > (error "Save aborted")) > > > It turns out that the call to interactive-p is returning nil, even > > though this function is being invoked in response to my typing "s" to > > vm (and calling the function via M-x gives the same result). This > > behavior didn't happen with an earlier version of Carbon Emacs (in > > turn based on an earlier version of GNU Emacs). If I comment-out the > > call to interactive-p, then > > things work as expected. > > > If I try a little test function of interactive-p in this version of > > Carbon Emacs, then it works as > > expected, so it's not always failing. > > > Does anyone have any suggestions as to where this problem is > > originating? > > > Thanks in advance for advice or help.... > > > Alley --~--~---------~--~----~------------~-------~--~----~ "Carbon Emacs" group mailing list. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [EMAIL PROTECTED] For more options, visit this group at http://groups.google.com/group/carbon-emacs?hl=en -~----------~----~----~----~------~----~------~--~---
