refactor: Remove unneeded and

This commit is contained in:
Mathieu Lirzin 2026-01-01 15:54:21 +01:00
parent 579eb28a50
commit 3191d9ee59
No known key found for this signature in database
GPG key ID: 0ADEE10094604D37

View file

@ -174,7 +174,7 @@
;; TODO: this is hack, but seems to work and is safe.
(defn source-str [[target _ file line]]
(try
(if (and (not= 1 line))
(if (not= 1 line)
(let [file-name (str/replace file #"(.*?)\.\S[^\.]+" "$1")
target-name (name target)
ns (str (subs target-name 0 (or (str/index-of target-name (str file-name "$")) 0)) file-name)]