;;;
;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Version:
-;;; $Id: emu-xemacs.el,v 6.0 1995/10/12 11:32:58 morioka Exp $
+;;; $Id: emu-xemacs.el,v 7.0 1995/11/14 03:59:24 morioka Exp $
;;; Keywords: emulation, compatibility, XEmacs
;;;
;;; This file is part of tl and tm (Tools for MIME).
(defvar mouse-button-2 'button2)
+(or (fboundp 'dired-other-frame)
+ (defun dired-other-frame (dirname &optional switches)
+ "\"Edit\" directory DIRNAME. Like `dired' but makes a new frame."
+ (interactive (dired-read-dir-and-switches "in other frame "))
+ (switch-to-buffer-other-frame (dired-noselect dirname switches))
+ )
+ )
+
+
;;; @ end
;;;