diff --git a/examples/explore_db.clj b/examples/explore_db.clj
index 20b69c1..b20154d 100644
--- a/examples/explore_db.clj
+++ b/examples/explore_db.clj
@@ -32,7 +32,7 @@
 
 (defn batch-entity
   [batch-id]
-  (str/replace batch-id #"-.*" ""))
+  (str/replace batch-id #"-[^-]*$" ""))
 
 (->> (client/q conn {:query '[:find ?id
                               :where [_ :mbrainz.initial-import/batch-id ?id]]