Is a method like this already in emacs?

[Matthias Pfeifer]

Dear list,

i recently added this defun to my init.el

(defun detach-window ()
  "Close current window and re-open it in new frame."
  (interactive)
  (let ((currentBuffer (window-buffer)))
    (progn
      (delete-window)
      (select-frame (make-frame))
      (set-window-buffer (selected-window) currentBuffer))))

and found it to be useful in several situations. now i wonder if a function
that does the same is already available somewhere in emacs? Also i am
curious about emacs lisp and could not successfully google for a related
mailing-list - now i wonder if somebody knows about one and shares the
knowledge.

Thanks in advance.
Matthias