From: Kai Gro?j. <ka...@us...> - 2002-01-01 19:51:21
|
Update of /cvsroot/tramp/tramp/lisp In directory usw-pr-cvs1:/tmp/cvs-serv9711/tramp/lisp Modified Files: ChangeLog tramp.el Log Message: (tramp-handle-file-truename): Obiwan error. (tramp-process-actions): New function. Doesn't do anything yet. Index: ChangeLog =================================================================== RCS file: /cvsroot/tramp/tramp/lisp/ChangeLog,v retrieving revision 2.58 retrieving revision 2.59 diff -C2 -d -r2.58 -r2.59 *** ChangeLog 2001/12/30 20:06:06 2.58 --- ChangeLog 2002/01/01 19:51:18 2.59 *************** *** 1,2 **** --- 1,7 ---- + 2002-01-01 Kai Grossjohann <ka...@ls...> + + * tramp.el (tramp-handle-file-truename): Obiwan error. + (tramp-process-actions): New function. Doesn't do anything yet. + 2001-12-30 Kai Großjohann <gro...@ls...> Index: tramp.el =================================================================== RCS file: /cvsroot/tramp/tramp/lisp/tramp.el,v retrieving revision 2.61 retrieving revision 2.62 diff -C2 -d -r2.61 -r2.62 *** tramp.el 2001/12/30 16:57:23 2.61 --- tramp.el 2002/01/01 19:51:18 2.62 *************** *** 1395,1398 **** --- 1395,1399 ---- (pop steps) ;; It's a symlink. + (pop steps) (when (string= curstri symlink-target) (error "Link `%s' points to itself" curstri)) *************** *** 3110,3113 **** --- 3111,3122 ---- ;; -- Functions for establishing connection -- ;; ------------------------------------------------------------ + + (defun tramp-process-actions + (multi-method method user host actions &optional timeout) + "Process given ACTIONS for login specified via first four args. + ACTIONS is a list of items (REGEXP FUN), where REGEXP specifies what + output from the remote end to look for, and FUN specifies the action + to take when the regexp matches." + nil) (defun tramp-open-connection-telnet (multi-method method user host) |