interactive D option does not work when use-dialog-box is nonnil

[Paul Kinnucan]

Symptoms:

The Java Development Environment for Emacs uses the following
code 

(defun jde-create-new-project (new-dir)
  (interactive "DCreate new project in directory: ")
  ...

to prompt the user for the path of a directory to store
a project file. If the value of the use-dialog-box option
is nonnil, Emacs displays a dialog box to get the desired
directory from the user. The File Name field of the dialog box 
displays "Current Directory" as its value and is greyed
out so that you cannot enter any other value. The dialog
box allows you to select a directory in a directory tree
but does not update the File Name field. When you select
the dialog box's Open button, the dialog box disappears
and Emacs displays an error dialog box reporting that
file "Current Directory" cannot be found. 


In GNU Emacs 21.3.50.1 (i386-mingw-nt5.1.2600)
 of 2005-01-30 on NONIQPC
Distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (3.3) --cflags -I../../jpeg-6b-3/include 
-I../../libpng-1.2.8/include -I../../tiff-3.6.1-2/include 
-I../../xpm-nox-4.2.0/include -I../../zlib-1.2.2/include'

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: ENU
  locale-coding-system: cp1252
  default-enable-multibyte-characters: t

Major mode: JDE

Minor modes in effect:
  auto-compression-mode: t
  msb-mode: t
  recentf-mode: t
  jde-plugin-minor-mode: t
  jde-bug-minor-mode: t
  cua-mode: t
  senator-minor-mode: t
  which-function-mode: t
  semantic-idle-completions-mode: t
  semantic-idle-summary-mode: t
  semantic-idle-scheduler-mode: t
  semantic-stickyfunc-mode: t
  tool-bar-mode: t
  encoded-kbd-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  line-number-mode: t
  transient-mark-mode: t
  abbrev-mode: t

Recent input:
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <help-echo> <menu-bar> <file> 
<Open Recent> <c:/home/jde-dev/jmath/src/jmath/Test.java> 
<help-echo> <help-echo> <help-echo> <help-echo> <menu-bar> 
<help-menu> <report-emacs-bug>

Recent messages:
Loading c:/home/jde-dev/jmath/prj.el (source)...done
Fontifying Test.java... (regexps....................)
Loading c:/home/jde-dev/jmath/prj.el (source)...done
Loading semantic-edit...done
Loading semanticdb-file...done
Mark set
Loading jde-javadoc (source)...
Loading c:/home/jde-dev/jmath/prj.el (source)...done
Loading jde-javadoc (source)...done
Loading emacsbug...done