X-Git-Url: https://git.korewanetadesu.com/?p=apt-sources-list.git;a=blobdiff_plain;f=apt-sources-list-test.el;h=6e5dfd9faed4885fca2d560a3a0c750c5d67d22e;hp=91c1180f7f4c427b17171752455c2fa7e7f0ef24;hb=5289443ceff230dfc8a2c1c6b524c90560eb08a5;hpb=de03d5bc13ed0e5b057618b6931e059fdcaf83cc

diff --git a/apt-sources-list-test.el b/apt-sources-list-test.el
index 91c1180..6e5dfd9 100644
--- a/apt-sources-list-test.el
+++ b/apt-sources-list-test.el
@@ -125,6 +125,13 @@ deb-src http://deb.test/debian stable main")))
     (type "C-c C-s stable RET")
     (should-equal-buffer "deb http://deb.test/debian stable xxx # foo")))
 
+(ert-deftest apt-sources-list-test-change-suite-empty ()
+  (with-apt-sources-list "deb http://deb.test/debian stable main # foo"
+    (type "C-c C-s / RET")
+    (should-equal-buffer "deb http://deb.test/debian / # foo")
+    (type "C-c C-s unstable RET M-0 C-k xxx RET")
+    (should-equal-buffer "deb http://deb.test/debian unstable xxx # foo")))
+
 (ert-deftest apt-sources-list-test-change-components ()
   (with-apt-sources-list "deb http://deb.test/debian stable main # foo"
     (type "C-c C-c M-0 C-k a SPC b")
@@ -144,7 +151,7 @@ deb http://deb.test/debian stable main"
     (should-be-at-line 4)
     (type "C-M-p")
     (should-be-at-line 1)
-    
+
     (should-error (type "C-M-p"))
     (should-error (type "C-u 2 C-M-n"))))
 
@@ -165,6 +172,6 @@ deb http://deb.test/debian stable main"
     (should-use-face 'font-lock-comment-delimiter-face)
     (search-forward "b")
     (should-use-face 'font-lock-comment-face)))
-                  
-   
+
+
 ;;; apt-sources-list-test.el ends here