🚀 go-pugleaf

Here is a bug fix for the remote mag tape library used in gnu tar.
I am going to be sending a full dist to r$alz for a fresh posting.

Arnold
-----------------
*** /tmp/,RCSt1a03059	Thu Mar 23 14:13:04 1989
--- rmtlib.c	Thu Mar 23 14:12:43 1989
***************
*** 1,9 ****
  #ifndef lint
! static char *RCSid = "$Header: /usr/src/local/usr.lib/librmt/RCS/rmtlib.c,v 1.6 88/10/25 17:04:29 root Exp $";
  #endif
  
  /*
   * $Log:	rmtlib.c,v $
   * Revision 1.6  88/10/25  17:04:29  root
   * rexec code and a bug fix from srs!dan, miscellanious cleanup. ADR.
   * 
--- 1,12 ----
  #ifndef lint
! static char *RCSid = "$Header: /usr/src/local/usr.lib/librmt/RCS/rmtlib.c,v 1.7 89/03/23 14:09:51 root Exp Locker: root $";
  #endif
  
  /*
   * $Log:	rmtlib.c,v $
+  * Revision 1.7  89/03/23  14:09:51  root
+  * Fix from haynes@ucscc.ucsc.edu for use w/compat. ADR.
+  * 
   * Revision 1.6  88/10/25  17:04:29  root
   * rexec code and a bug fix from srs!dan, miscellanious cleanup. ADR.
   * 
***************
*** 355,361 ****
  		close(Ctp[i][0]); close(Ctp[i][1]);
  		(void) setuid (getuid ());
  		(void) setgid (getgid ());
! 		if (*user)
  		{
  			execl("/usr/ucb/rsh", "rsh", system, "-l", login,
  				"/etc/rmt", (char *) 0);
--- 358,364 ----
  		close(Ctp[i][0]); close(Ctp[i][1]);
  		(void) setuid (getuid ());
  		(void) setgid (getgid ());
! 		if (*login)
  		{
  			execl("/usr/ucb/rsh", "rsh", system, "-l", login,
  				"/etc/rmt", (char *) 0);