diff --git a/lib/warp.ks b/lib/warp.ks
index e8bb9b6..2d028f3 100644
--- a/lib/warp.ks
+++ b/lib/warp.ks
@@ -3,13 +3,16 @@
 function warp_to {
     parameter timestamp.
 
+    if timestamp <= TIME:seconds {
+        return.
+    }
+
+    print "Warping for " + round(timestamp - TIME:seconds, 1) + " seconds".
     KUNIVERSE:timewarp:warpto(timestamp).  // TODO: improve.
     wait until TIME:seconds >= timestamp. // TODO
 }
 
 function warp_for {
     parameter seconds.
-
-    print "Warping for " + round(seconds, 1) + " seconds".
     return warp_to(TIME:seconds + seconds).
 }