diff --git a/contrib/aim/aim.factor b/contrib/aim/aim.factor
index c636b3e633..c9fb1893bf 100644
--- a/contrib/aim/aim.factor
+++ b/contrib/aim/aim.factor
@@ -373,6 +373,12 @@ M: object get-banned ( name -- <buddy> )
     ] unless ;
 
 : handle-online-info
+    snac-flags get 32768 = [
+        head-short drop
+        head-short drop
+        head-short drop
+        head-short drop
+    ] when
     (handle-online-info)
     ; FAMILY: 1 OPCODE: f