From 61097d86f4189c84b4e55ec4aeaff49bc1309842 Mon Sep 17 00:00:00 2001
From: Slava Pestov <Slava Pestov>
Date: Mon, 11 May 2009 22:04:54 -0500
Subject: [PATCH] mason.notify: fix munged refactoring

---
 extra/mason/notify/notify.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/extra/mason/notify/notify.factor b/extra/mason/notify/notify.factor
index c75014e1b0..6c643d64d5 100644
--- a/extra/mason/notify/notify.factor
+++ b/extra/mason/notify/notify.factor
@@ -16,8 +16,8 @@ IN: mason.notify
         ] { } make prepend
         [ 5 ] 2dip '[
             <process>
-                _ >>command
                 _ [ +closed+ ] unless* >>stdin
+                _ >>command
             try-output-process
         ] retry
     ] [ 2drop ] if ;
@@ -47,4 +47,4 @@ IN: mason.notify
     ] bi ;
 
 : notify-release ( archive-name -- )
-    "Uploaded " prepend [ print flush ] [ mason-tweet ] bi ;
\ No newline at end of file
+    "Uploaded " prepend [ print flush ] [ mason-tweet ] bi ;