added suggestions

src/clj/auto_ap/import/manual/common.clj

@@ -20,13 +20,6 @@
     (catch Exception e
       (throw (Exception. (str "Could not parse expense account from value '" (:account-numeric-code i) "'") e)))))
 
-(defn parse-account-id [i]
-  (try
-    (Long/parseLong (second
-                     (re-matches #"[^0-9,\\-]*([0-9,\\-]+)[^0-9,]*" (:bank-account-id i))))
-    (catch Exception e
-      (throw (Exception. (str "Could not parse account from value '" (:bank-account-id i) "'") e)))))
-
 (defn parse-date [{:keys [raw-date]}]
   (when-not
       (re-find #"\d{1,2}/\d{1,2}/\d{4}" raw-date)