test for fractional durations

Author: milt

spec/cljx/xapi_schema/schemata/json_spec.cljx

@@ -133,10 +133,13 @@
  (it "is a valid ISO 8601 Duration"
      (should-satisfy+ Duration
                       "P3Y6M4DT12H30M5S"
+                      "P3Y6M4DT12H30M5.2S" ;; good fractional
                       :bad
                       "2 hours"
                       "P"
-                      "PT")))
+                      "PT"
+                      "P3Y6M4DT12H30.1M5S" ;; bad fractional
+                      )))
 
 (describe
  "Version"