Skip to content
This repository
Browse code

rename internal functions

  • Loading branch information...
commit da751308f658151b69c445e7b22476f551680b46 1 parent 1fd9512
Yann Hodique authored April 28, 2013

Showing 1 changed file with 8 additions and 8 deletions. Show diff stats Hide diff stats

  1. 16  tests/magit-tests.el
16  tests/magit-tests.el
@@ -40,7 +40,7 @@
40 40
          (when ,buffer (kill-buffer ,buffer))))))
41 41
 
42 42
 
43  
-(defun magit--get-latest-sha1 ()
  43
+(defun magit-tests--get-latest-sha1 ()
44 44
   (magit-git-string "log"
45 45
                     "-n"
46 46
                     "1"
@@ -48,7 +48,7 @@
48 48
                     "--format=%h"
49 49
                     "HEAD"))
50 50
 
51  
-(defun magit--commit-all (msg)
  51
+(defun magit-tests--commit-all (msg)
52 52
   (magit-stage-all t)
53 53
   (magit-log-edit)
54 54
   (insert msg)
@@ -120,22 +120,22 @@
120 120
         (insert "1")
121 121
         (write-file (format "%s/%s" repo-server dummy-filename)))
122 122
       (magit-status repo-server)
123  
-      (magit--commit-all "dummy message")
  123
+      (magit-tests--commit-all "dummy message")
124 124
 
125 125
       (with-cloned-git-repo repo-server repo-client
126 126
         (with-temp-buffer
127 127
           (insert "2")
128 128
           (write-file (format "%s/%s" repo-client dummy-filename)))
129 129
         (magit-status repo-client)
130  
-        (magit--commit-all "an unpushed commit")
131  
-        (magit-tests-section-has-item-title (magit--get-latest-sha1) '(unpushed))
  130
+        (magit-tests--commit-all "an unpushed commit")
  131
+        (magit-tests-section-has-item-title (magit-tests--get-latest-sha1) '(unpushed))
132 132
 
133 133
         (with-temp-buffer
134 134
           (insert "3")
135 135
           (write-file (format "%s/%s" repo-client dummy-filename)))
136 136
         (magit-status repo-client)
137  
-        (magit--commit-all "an unpushed commit #2")
138  
-        (magit-tests-section-has-item-title (magit--get-latest-sha1) '(unpushed))))))
  137
+        (magit-tests--commit-all "an unpushed commit #2")
  138
+        (magit-tests-section-has-item-title (magit-tests--get-latest-sha1) '(unpushed))))))
139 139
 
140 140
 (ert-deftest magit-get-boolean ()
141 141
   (with-temp-git-repo repo
@@ -155,6 +155,6 @@
155 155
         (insert "dummy content")
156 156
         (write-file (format "%s/%s" repo dummy-filename)))
157 157
       (magit-status repo)
158  
-      (magit--commit-all "dummy message")
  158
+      (magit-tests--commit-all "dummy message")
159 159
       (with-opened-file (format "%s/%s" repo dummy-filename)
160 160
         (should (magit-blame-mode))))))

0 notes on commit da75130

Please sign in to comment.
Something went wrong with that request. Please try again.