xref: /original-bsd/old/refer/refer/glue2.c (revision 3109f15a)
1 #ifndef lint
2 static char *sccsid = "@(#)glue2.c	4.1 (Berkeley) 05/06/83";
3 #endif
4 
5 char refdir[50];
6 
7 savedir()
8 {
9 	if (refdir[0]==0)
10 		corout ("", refdir, "/bin/pwd", "", 50);
11 	trimnl(refdir);
12 }
13 
14 restodir()
15 {
16 	chdir(refdir);
17 }
18