diff --git a/contrib/emacs.factor b/contrib/emacs.factor
index 28fcfc90e6..d2b4cb96f9 100644
--- a/contrib/emacs.factor
+++ b/contrib/emacs.factor
@@ -6,7 +6,7 @@ namespaces ;
 IN: emacs
 
 : emacsclient ( file line -- )
-number>string "emacsclient --no-wait +" swap append " " rot append3 system ;
+number>string "emacsclient --no-wait +" swap append " " rot append3 system drop ;
 
 : emacs ( word -- )
 where first2 emacsclient ;