diff --git a/basis/urls/urls.factor b/basis/urls/urls.factor
index 4f2639975b..f4a6a7d792 100644
--- a/basis/urls/urls.factor
+++ b/basis/urls/urls.factor
@@ -212,11 +212,15 @@ PRIVATE>
     [ [ host>> ] [ port>> ] bi <inet> ] [ protocol>> ] bi
     secure-protocol? [ <secure> ] when ;
 
+ERROR: no-protocol-found protocol ;
+
 : protocol-port ( protocol -- port )
     {
         { "http" [ 80 ] }
         { "https" [ 443 ] }
+        { "feed" [ 80 ] }
         { "ftp" [ 21 ] }
+        [ no-protocol-found ]
     } case ;
 
 : ensure-port ( url -- url' )