 database connection. Exceptions will be logged and a boolean value
 will be returned that indicates whether or not the script execution
 was successful."
-  (log/debug "Safe run script" script-url)
+  (log/debug "Safe run script:" script-url)
   (try
     (run-script conn script-url)
     true
     (catch Exception ex
-      (log/error ex "Error running script: " script-url)
+      (log/error ex "Error running script:" script-url)
       false)))
 
 (defn get-schema-version [ conn schema-name ]

                        schema-name])
    (catch Exception ex
      (when (log/enabled? :debug)
        (log/error ex "Error while attempting to identify version of schema: "
                   schema-name)) 
      nil)))

(defn set-schema-version! [ conn schema-name req-schema-version ]

(defn- run-script [ conn script-url ]
  "Run the database script at the given URL against a specific
database connection."
  (log/debug "Run script:" script-url)
  (let [ script-text (slurp script-url) ]
    (do-statements conn (script/sql-statements script-text))))

