Contents of /nfo/perl/scripts/umltools/sue

#!/bin/sh

user=$1

if test -z $user; then
  exit;
fi

tty=`tty`

# change ownership of tty-device
chown $user $tty

# do normal user switch
su $user

1	#!/bin/sh
2
3	user=$1
4
5	if test -z $user; then
6	exit;
7	fi
8
9	tty=`tty`
10
11	# change ownership of tty-device
12	chown $user $tty
13
14	# do normal user switch
15	su $user
16
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26