CLJ-2004 include retag in multi-spec form

Signed-off-by: Stuart Halloway <[email protected]>

Author: puredanger

src/clj/clojure/spec.clj

@@ -928,7 +928,7 @@
                   (when (every? identity gs)
                     (gen/one-of gs)))))
         (with-gen* [_ gfn] (multi-spec-impl form mmvar retag gfn))
-        (describe* [_] `(multi-spec ~form))))))
+        (describe* [_] `(multi-spec ~form ~retag))))))
 
 (defn ^:skip-wiki tuple-impl
   "Do not call this directly, use 'tuple'"