diff --git a/test/honey/sql_test.cljc b/test/honey/sql_test.cljc
index f581d60..c7591e4 100644
--- a/test/honey/sql_test.cljc
+++ b/test/honey/sql_test.cljc
@@ -1054,6 +1054,12 @@ ORDER BY id = ? DESC
   (is (= ["SELECT `A``B`"]     (sut/format {:select (keyword "A`B")} {:dialect :mysql})))
   (is (= ["SELECT \"A\"\"B\""] (sut/format {:select (keyword "A\"B")} {:dialect :oracle}))))
 
+(deftest issue-407-temporal
+  (is (= ["SELECT f.* FROM foo AS f FOR SYSTEM_TIME ALL WHERE f.id = ?" 1]
+         (sut/format {:select :f.* :from [[:foo :f :for :system-time :all]] :where [:= :f.id 1]})))
+  (is (= ["SELECT * FROM foo FOR SYSTEM_TIME ALL WHERE id = ?" 1]
+         (sut/format {:select :* :from [[:foo :for :system-time :all]] :where [:= :id 1]}))))
+
 (deftest issue-421-mysql-replace-into
   (is (= ["INSERT INTO table VALUES (?, ?, ?)" 1 2 3]
          (sut/format {:insert-into :table :values [[1 2 3]]})))