FW: JDEbug - Show debug frame on XEmacs
Any comments?
-----Original Message-----
From: Schmitt, Christian (ext.)
[mailto:Christian.Schmittï¼ Dresdner-Bank.com]
Sent: Monday, January 13, 2003 8:20 AM
To: jde(a)sunsite.dk
Subject: JDEbug - Show debug frame on XEmacs
Hi,
today I used JDEbug for the first time. I clicked on "Show debug frame" in
the "JDEbug" menu
which didn't work on XEmacs 21.4.11 [Win32 native] (JDE 2.3.2) with an
error, that
'make-fram-names-alist function definition is void.
Now I don't know if there's an XEmacs equivalent to this function.
Right now I work around it by putting this in my .emacs:
;
; XEmacs does not have 'make-fram-names-alist
; so we define it when it's not there.
; Source is taken from GNU Emacs' frame.el where
; function 'frame-parameter (in GNU Emacs) hase been
; replaced by 'frame-property
;
(if (not (fboundp 'make-frame-names-alist))
(defun make-frame-names-alist ()
(let* ((current-frame (selected-frame))
(falist
(cons
(cons (frame-property current-frame 'name) current-frame)
nil))
(frame (next-frame nil t)))
(while (not (eq frame current-frame))
(progn
(setq falist (cons (cons (frame-property frame 'name) frame)
falist))
(setq frame (next-frame frame t))))
falist))
)
Cheers,
Christian Schmitt