Don't ask github permission when not first clone

pull/645/head
Tienson Qin 2020-07-06 14:40:44 +08:00
parent 8c9876bdcd
commit 0d2b36c271
1 changed files with 4 additions and 3 deletions

View File

@ -268,10 +268,10 @@
repo-url
name
(fn [permission]
(create-month-journal-if-not-exists repo-url)
(create-config-file-if-not-exists repo-url)
(let [permission (:permission permission)
write-permission (contains? #{"admin" "write"} permission)]
(create-month-journal-if-not-exists repo-url)
(create-config-file-if-not-exists repo-url)
(db/set-key-value repo-url :git/write-permission? write-permission)))
(fn []))))
@ -279,7 +279,8 @@
[repo-url diffs first-clone?]
(when (or diffs first-clone?)
(p/let [_ (load-repo-to-db! repo-url diffs first-clone?)]
(create-default-files! repo-url)
(when first-clone?
(create-default-files! repo-url))
(history/clear-specific-history! [:git/repo repo-url])
(history/add-history!