core: cramp -> bound (was short)

[factor.git] / extra / youtube / youtube.factor

diff --git a/extra/youtube/youtube.factor b/extra/youtube/youtube.factor
index a043c6c199c668b7bf7d8cc9d24b863f2e697909..4d44b7a2fc8844c197fd50bb595a2435def5575c 100644 (file)
--- a/extra/youtube/youtube.factor
+++ b/extra/youtube/youtube.factor
@@ -61,7 +61,7 @@ CONSTANT: video-info-url URL" http://www.youtube.com/get_video_info"
 : sanitize ( title -- title' )
     [ 0 31 between? ] reject
     [ "\"#$%'*,./:;<>?^|~\\" member? ] reject
-    200 cramp head ;
+    200 bound head ;
 
 : downloadable? ( video-info -- ? )
     "use_cipher_signature" of "False" = ;