"Vin Shelton" <acs(a)alumni.princeton.edu> writes:
Tried that, no success :-(
Tracing the function calls it seems that `make-dialog-box' gets called
properly. The underlying function `make-dialog-box-internal' seems
to ignore the `:initial-directory' part.
,----
| 1 -> read-file-name: prompt="Save MIME part to: " dir="c:\\Documents
and Settings\\mh\\Downloads\\" default=nil must-match=nil
initial-contents="xxxxxxxxxxxxxxxxx.xxx" history=nil
| | 2 -> read-file-name-1: type=file history=file-name-history prompt="Save MIME
part to: " dir="c:\\Documents and Settings\\mh\\Downloads\\"
default="~\\Downloads\\xxxxxxxxxxxxxxxxx.xxx" must-match=nil
initial-contents="xxxxxxxxxxxxxxxxx.xxx" completer=read-file-name-internal
| | | 3 -> make-dialog-box: type=file cl-keys=(:title "Save Mime Part to"
:initial-directory "c:\\Documents and Settings\\mh\\Downloads\\"
:file-must-exist nil :initial-filename "xxxxxxxxxxxxxxxxx.xxx")
`----
Try evaluating this and observe what happens:
(make-dialog-box-internal 'file '(:title "Save Mime Part to"
:initial-directory "c:\\Foo"
:file-must-exist nil :initial-filename "bar"))
Best regards
Marcus
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta