Add some more db -> ledger deprecations

Author: cap10morgan

src/fluree/db/operations.cljc

@@ -60,9 +60,9 @@
   ([session] (delete-ledger-async session nil))
   ([session {:keys [snapshot?] :as opts}]
    (let [{:keys [dbid network conn]} session]
-     (send-operation conn :delete-db {:network   network
-                                      :dbid      dbid
-                                      :snapshot? snapshot?}))))
+     (send-operation conn :delete-ledger {:network   network
+                                          :ledger-id dbid
+                                          :snapshot? snapshot?}))))
 
 
 (defn garbage-collect-async
@@ -72,10 +72,10 @@
   [session & [{:keys [toBlock toTime]} :as opts]]
   (async/go
     (let [{:keys [network dbid conn]} session]
-      (send-operation conn :garbage {:network network
-                                     :dbid    dbid
-                                     :toBlock toBlock
-                                     :toTime  toTime}))))
+      (send-operation conn :garbage {:network   network
+                                     :ledger-id dbid
+                                     :toBlock   toBlock
+                                     :toTime    toTime}))))
 
 
 (defn snapshot-ledger-async
@@ -84,7 +84,7 @@
   A final 'completed' message will be sent in the future, if anyone cares to hear it."
   [session opts]
   (let [{:keys [network dbid conn]} session]
-    (send-operation conn :snapshot-db [network dbid])))
+    (send-operation conn :snapshot-ledger [network dbid])))
 
 
 (defn command-async
@@ -106,24 +106,24 @@
 
 
 (defn ledger-info-async
-  "Returns information about a ledger in a map, or empty map if db doesn't exist."
+  "Returns information about a ledger in a map, or empty map if ledger doesn't exist."
   [conn ledger]
   (send-operation conn :ledger-info ledger))
 
 (defn ledger-status-async
-  "Returns information about a ledger in a map, or empty map if db doesn't exist."
+  "Returns information about a ledger in a map, or empty map if ledger doesn't exist."
   [conn ledger]
   (:status (send-operation conn :ledger-info ledger)))
 
 (defn ledger-stats-async
-  "Returns stats about a ledger in a map, or empty map if db doesn't exist."
+  "Returns stats about a ledger in a map, or empty map if ledger doesn't exist."
   [conn ledger]
   (send-operation conn :ledger-stats ledger))
 
 (defn ledgers-async
   "Returns a list of ledgers in two-tuples of [network ledger-id]."
   [conn]
-  (send-operation conn :db-list nil))
+  (send-operation conn :ledger-list nil))
 
 
 (defn transact-async