bug in calendar-exit (calendar-hide-window)

[John J Foerch]

Hello,

In calendar, under a configuration like the following, calendar-exit
kills the frame instead of just the window containing the calendar:

(setq pop-up-windows                nil
      pop-up-frames                 t
      special-display-buffer-names  '(("*Calendar*" (same-frame . t)))
      display-buffer-mark-dedicated 'weak)

Under this configuration, pop-up-frames are used, with windows dedicated
to their buffers, but the calendar is opened in the current frame, not a
new frame.  Calendar-hide-window seems to assume that whenever dedicated
windows are being used, it is okay to delete or iconify a frame:

  (cond
   ...
   ((and (display-multi-frame-p) (window-dedicated-p window))
    (if calendar-remove-frame-by-deleting
        (delete-frame (window-frame window))
        (iconify-frame (window-frame window))))
   ...
   )

M-x version:

  GNU Emacs 23.4.1 (x86_64-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
  of 2012-04-07 on trouble, modified by Debian

Any thoughts for a solution?

Thank you

-- 
John Foerch