use imap not imap4
diff --git a/src/cmd/upas/fs/imap4.c b/src/cmd/upas/fs/imap4.c
index 152d15c..bc51089 100644
--- a/src/cmd/upas/fs/imap4.c
+++ b/src/cmd/upas/fs/imap4.c
@@ -431,7 +431,7 @@
 	if(imap->mustssl)
 		port = "imaps";
 	else
-		port = "imap4";
+		port = "imap";
 
 	if((imap->fd = dial(netmkaddr(imap->host, "net", port), 0, 0, 0)) < 0)
 		return geterrstr();