From d1b1eabf1e7566eac72f50a9051a263b805c4c8a Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 20 Apr 2014 19:34:22 -0700
Subject: [PATCH] calendar: M\ timestamp clone should clone gmt-offset.

---
 basis/calendar/calendar.factor | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/basis/calendar/calendar.factor b/basis/calendar/calendar.factor
index 0fd023ee04..517d746951 100644
--- a/basis/calendar/calendar.factor
+++ b/basis/calendar/calendar.factor
@@ -33,6 +33,8 @@ TUPLE: timestamp
 
 C: <timestamp> timestamp
 
+M: timestamp clone (clone) [ clone ] change-gmt-offset ;
+
 : gmt-offset-duration ( -- duration )
     0 0 0 gmt-offset <duration> ; inline