diff --git a/Makefile.in b/Makefile.in
index 763cf97..e39926d 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -691,8 +691,9 @@ scsh/regexp/libregexp.a:
 	$(CC) $(LDFLAGS) -o $@ smain.o $< $(OBJS) $(LIBS)
 
 install-scsh: scsh
-	$(INSTALL_PROGRAM) $(srcdir)/scsh/scsh.image $(LIB)/scsh.image
+	$(RM) $(bindir)/$(RUNNABLE)
 	$(INSTALL_PROGRAM) $(srcdir)/scsh/scsh $(bindir)/$(RUNNABLE)
+	$(INSTALL_PROGRAM) $(srcdir)/scsh/scsh.image $(LIB)/scsh.image
 	for f in $(srcdir)/scsh/*.scm; \
 	    do $(INSTALL_DATA) $$f $(LIB)/scsh/; done
 
diff --git a/scsh/network1.c b/scsh/network1.c
index 02cb5f5..1c6cd4d 100644
--- a/scsh/network1.c
+++ b/scsh/network1.c
@@ -217,7 +217,7 @@ int recv_substring(int s,
 	return recv(s, StrByte(buf,start), end-start, flags);
       }
 #endif
-    case 6:			/* AF_INET */
+    case 8:			/* AF_INET */
       {
 	struct sockaddr_in name;
 	int namelen=sizeof(name);