Merge branch 'andelf-enhance/allow-edit-markup-files'

pull/3876/head
Tienson Qin 2022-01-12 11:54:21 +08:00
commit 138335987b
3 changed files with 3 additions and 12 deletions

View File

@ -105,14 +105,6 @@
(and format (contains? (config/img-formats) format))
[:img {:src path}]
(and format (contains? config/markup-formats format))
(when-let [file-content (db/get-file path)]
(let [content (string/trim file-content)]
(content/content path {:config {:file? true
:file-path path}
:content content
:format format})))
(and format (contains? (config/text-formats) format))
(when-let [file-content (db/get-file path)]
(let [content (string/trim file-content)

View File

@ -183,8 +183,7 @@
(file-handler/alter-file (state/get-current-repo)
path
(str (string/trim value) "\n")
{:re-render-root? true})
(notification/show! "Saved file!" :success)))
{:re-render-root? true})))
:else
nil))))

View File

@ -35,7 +35,7 @@
(p/resolved (= (string/trim disk-content) (string/trim db-content))))))
(defn- write-file-impl!
[this repo dir path content {:keys [ok-handler error-handler skip-compare?] :as opts} stat]
[this repo dir path content {:keys [ok-handler error-handler old-content skip-compare?] :as opts} stat]
(if skip-compare?
(p/catch
(p/let [result (ipc/ipc "writeFile" repo path content)]
@ -55,7 +55,7 @@
ext (string/lower-case (util/get-file-ext path))
file-page (db/get-file-page-id path)
page-empty? (and file-page (db/page-empty? repo file-page))
db-content (or (db/get-file repo path) "")
db-content (or old-content (db/get-file repo path) "")
contents-matched? (contents-matched? disk-content db-content)
pending-writes (state/get-write-chan-length)]
(cond