ryuslash/git-auto-commit-mode
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rename test setup function

Browse source 
I’d like to rename other functions as well, but especially with the commands and
variables I’m afraid of breaking configurations. I don’t have to worry about
that so much yet with the test functions.
This commit is contained in:
Tom Willemse 2020-08-18 23:32:07 -07:00
parent 23abaff792
commit e2c939cb8e
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
tests/git-auto-commit-mode-tests.el
View file

@ -27,7 +27,7 @@
(require 'buttercup) (require 'buttercup)
(require 'git-auto-commit-mode) (require 'git-auto-commit-mode)
(defun gas-test-setup-git () (defun git-auto-commit-tests-setup-git ()
(shell-command "git init") (shell-command "git init")
(shell-command "git config user.email user@example.com") (shell-command "git config user.email user@example.com")
(shell-command "git config user.name \"User Example\"")) (shell-command "git config user.name \"User Example\""))
@ -41,7 +41,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -59,7 +59,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -76,7 +76,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -93,7 +93,7 @@
(mkdir (expand-file-name "test" temp-dir)) (mkdir (expand-file-name "test" temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -109,7 +109,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -126,7 +126,7 @@
(mkdir (expand-file-name "[test]-test" temp-dir)) (mkdir (expand-file-name "[test]-test" temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -142,7 +142,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)
@ -158,7 +158,7 @@
(default-directory temp-dir)) (default-directory temp-dir))
(unwind-protect (unwind-protect
(progn (progn
(gas-test-setup-git) (git-auto-commit-tests-setup-git)
(let ((buffer (find-file-noselect temp-file))) (let ((buffer (find-file-noselect temp-file)))
(with-current-buffer buffer (with-current-buffer buffer
(git-auto-commit-mode) (git-auto-commit-mode)