;;; talk.el --- allow several users to talk to each other through Emacs
-;; Copyright (C) 1995, 2001-2012 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 2001-2014 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: comm, frames
(let ((type (frame-live-p (selected-frame))))
(if (or (eq type t) (eq type 'x))
(talk-add-display
- (terminal-name (frame-terminal (selected-frame))))
+ (terminal-name (frame-terminal)))
(error "Unknown frame type")))
(talk-update-buffers))