Fix stack effect to not print "(( -- ))", remove stray effect from smtp.

[factor.git] / basis / smtp / smtp.factor

diff --git a/basis/smtp/smtp.factor b/basis/smtp/smtp.factor
index 5b99edc9e8fa316287f5fa69367cc9e2849d0cb1..a4ba630f3c1eb60861abded26a08dc08b5090918 100644 (file)
--- a/basis/smtp/smtp.factor
+++ b/basis/smtp/smtp.factor
@@ -28,7 +28,7 @@ C: <plain-auth> plain-auth
 SYMBOL: smtp-auth
 no-auth smtp-auth set-global
 
-LOG: log-smtp-connection NOTICE ( addrspec -- )
+LOG: log-smtp-connection NOTICE
 
 : with-smtp-connection ( quot -- )
     smtp-server get