From f8fdb500cc705e2b8b4a74166ceb2c6d8cee3fd3 Mon Sep 17 00:00:00 2001 From: Karen Arutyunov Date: Tue, 4 Sep 2018 14:02:11 +0300 Subject: Rename .test/test{} to .testscript/testscript{} --- tests/rep-fetch-git-commit.test | 93 ----------------------------------------- 1 file changed, 93 deletions(-) delete mode 100644 tests/rep-fetch-git-commit.test (limited to 'tests/rep-fetch-git-commit.test') diff --git a/tests/rep-fetch-git-commit.test b/tests/rep-fetch-git-commit.test deleted file mode 100644 index 58c9ffe..0000000 --- a/tests/rep-fetch-git-commit.test +++ /dev/null @@ -1,93 +0,0 @@ -# file : tests/rep-fetch-git-commit.test -# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd -# license : MIT; see accompanying LICENSE file - -+git clone "$rep_git/state0/style-basic.git" 2>! &style-basic/*** - -: unadvertised -: -{ - +git -C ../style-basic log '--pretty=format:%H' --all --grep='README' | \ - set commit - - : no-refname - : - : Here we also test that a commit can be specified without leading '@'. - : - { - $clone_root_cfg && $rep_add "$rep/state0/style-basic.git#$commit"; - - if ($git_protocol == 'https-dumb') - warn = "$warn_repo_hist$reason_dumb$warn_dumb" - elif ($git_protocol != 'https-smart-unadv') - warn = "$warn_repo_hist$reason_unadv" - end; - - $* 2>>~"%EOE%" - %fetching git:.+style-basic#$commit% - %querying .+style-basic\.git%? - %fetching from .+style-basic\.git% - $warn - 1 package\(s\) in 1 repository\(s\) - EOE - } - - : refname - : - { - $clone_root_cfg && $rep_add "$rep/state0/style-basic.git#stable@$commit"; - - if ($git_protocol == 'https-dumb') - warn = "$warn_ref_hist$reason_dumb$warn_dumb" - elif ($git_protocol != 'https-smart-unadv') - warn = "$warn_ref_hist$reason_unadv" - end; - - $* 2>>~"%EOE%" - %fetching git:.+style-basic#stable@$commit% - %querying .+style-basic\.git%? - %fetching from .+style-basic\.git% - $warn - 1 package\(s\) in 1 repository\(s\) - EOE - } -} - -: advertised -: -{ - +git -C ../style-basic log '--pretty=format:%H' --all --grep='INSTALL' | \ - set commit - - +if ($git_protocol == 'https-dumb') - warn = "$warn_ref_hist$reason_dumb$warn_dumb" - end - - : no-refname - : - { - $clone_root_cfg && $rep_add "$rep/state0/style-basic.git#@$commit"; - - $* 2>>~"%EOE%" - %fetching git:.+style-basic#@$commit% - %querying .+style-basic\.git%? - %fetching from .+style-basic.\git% - $warn - 1 package\(s\) in 1 repository\(s\) - EOE - } - - : refname - : - { - $clone_root_cfg && $rep_add "$rep/state0/style-basic.git#stable@$commit"; - - $* 2>>~"%EOE%" - %fetching git:.+style-basic#stable@$commit% - %querying .+style-basic\.git%? - %fetching from .+style-basic\.git% - $warn - 1 package\(s\) in 1 repository\(s\) - EOE - } -} -- cgit v1.1