Mercurial > hg > xemacs-beta

comparison lisp/packages/gopher.el @ 108:360340f9fd5f r20-1b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents 131b0175ea99
children 34a5b81f86ba
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
1308 ;;;; telneting. 1308 ;;;; telneting.
1309 ;;;; 1309 ;;;;
1310 1310
1311 (defun gopher-telnet-object (obj oldbuf) 1311 (defun gopher-telnet-object (obj oldbuf)
1312 "Start a telnet session to a gopher object. 1312 "Start a telnet session to a gopher object.
1313 If gopher-telnet-command is nonnil, then that is a command to start 1313 If gopher-telnet-command is non-nil, then that is a command to start
1314 a telnet session in a subprocess. Otherwise, the emacs-lisp telnet 1314 a telnet session in a subprocess. Otherwise, the emacs-lisp telnet
1315 package is used." 1315 package is used."
1316 1316
1317 ;; make the telnet argument string 1317 ;; make the telnet argument string
1318 (let ((arg (gopher-object-host obj)) 1318 (let ((arg (gopher-object-host obj))