summaryrefslogtreecommitdiff
path: root/lisp/frame.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-01-10 13:04:37 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-01-10 13:04:37 +0000
commit6c1ec5a0505cce365e272bce948258b276b29142 (patch)
tree815273c44e4452785d618af626c3bb6fa5b7b0b8 /lisp/frame.el
parent53ed745ab7978c8ece696a78807cbdda72fc5dd2 (diff)
downloademacs-6c1ec5a0505cce365e272bce948258b276b29142.tar.gz
* gs.el: File removed.
Diffstat (limited to 'lisp/frame.el')
-rw-r--r--lisp/frame.el17
1 files changed, 0 insertions, 17 deletions
diff --git a/lisp/frame.el b/lisp/frame.el
index c34e5d361f2..e886a517928 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -648,23 +648,6 @@ The optional argument PARAMETERS specifies additional frame parameters."
(make-frame `((window-system . x)
(display . ,display) . ,parameters)))))
-(defun make-frame-on-tty (tty type &optional parameters)
- "Make a frame on terminal device TTY.
-TTY should be the file name of the tty device to use. TYPE
-should be the terminal type string of TTY, for example \"xterm\"
-or \"vt100\". The optional third argument PARAMETERS specifies
-additional frame parameters."
- ;; Use "F" rather than "f", in case the device does not exist, as
- ;; far as the filesystem is concerned.
- (interactive "FOpen frame on tty device: \nsTerminal type of %s: ")
- (unless tty
- (error "Invalid terminal device"))
- (unless type
- (error "Invalid terminal type"))
- (if (eq window-system 'pc)
- (make-frame `((window-system . pc) (tty . ,tty) (tty-type . ,type) . ,parameters))
- (make-frame `((window-system . nil) (tty . ,tty) (tty-type . ,type) . ,parameters))))
-
(declare-function x-close-connection "xfns.c" (terminal))
(defun close-display-connection (display)