aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorLaurence Kedward <laurence.kedward@bristol.ac.uk>2021-08-19 13:18:53 +0100
committerGitHub <noreply@github.com>2021-08-19 13:18:53 +0100
commitfed8635941f185c36eae731d230ee07e4cd639b3 (patch)
treed6a6ffb63353418adb2b25b33fd7c3709a73b7e3 /src
parentd72d95396e75dfcea726f6363d3b8807708fdc4d (diff)
parent2b0949f236f2fb022bfb4f92704443d087ea907e (diff)
downloadfpm-fed8635941f185c36eae731d230ee07e4cd639b3.tar.gz
fpm-fed8635941f185c36eae731d230ee07e4cd639b3.zip
Merge pull request #536 from urbanjost/init_git_on_backfill
still call "git init" even if fpm.toml exists in backfill
Diffstat (limited to 'src')
-rw-r--r--src/fpm/cmd/new.f905
1 files changed, 5 insertions, 0 deletions
diff --git a/src/fpm/cmd/new.f90 b/src/fpm/cmd/new.f90
index 0afe651..abc1d67 100644
--- a/src/fpm/cmd/new.f90
+++ b/src/fpm/cmd/new.f90
@@ -589,6 +589,11 @@ character(len=*),intent(in) :: filename
integer :: lun
character(len=8) :: date
+ if(exists(filename))then
+ write(stderr,'(*(g0,1x))')'<INFO> ',filename,&
+ & 'already exists. Not overwriting'
+ return
+ endif
!> get date to put into metadata in manifest file "fpm.toml"
call date_and_time(DATE=date)
table = toml_table()