From e05eecf26bde2b6d26d229c5e35b7a052f11709a Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 7 Dec 2019 10:40:35 -0800
Subject: [PATCH] webapps.pastebin: fix

---
 extra/webapps/pastebin/pastebin.factor | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/extra/webapps/pastebin/pastebin.factor b/extra/webapps/pastebin/pastebin.factor
index 6b07131285..c456ccf3d5 100644
--- a/extra/webapps/pastebin/pastebin.factor
+++ b/extra/webapps/pastebin/pastebin.factor
@@ -157,13 +157,12 @@ M: annotation entity-url
     pastebin-email-list get-global [
         drop
     ] [
-        clone
+        <email> swap >>to
+        swap clone
             "https" >>protocol
             "paste.factorcode.org" >>host
             [ "$pastebin" ?head drop ] change-path
-        present
-        <email> swap >>to
-        swap >>body
+        present >>body
         "factor-builds2@gmail.com" >>from
         "New paste" >>subject
         send-email