adding "clean" mode to puppetca

git-svn-id: https://reductivelabs.com/svn/puppet/trunk@1140 980ebf18-57e1-0310-9a29-db15c13687c0

1 files changed, 7 insertions, 0 deletions

diff --git a/test/server/ca.rb b/test/server/ca.rb
index 99b79fea2..0009b3d32 100644
--- a/test/server/ca.rb
+++ b/test/server/ca.rb
@@ -147,6 +147,13 @@ class TestCA < Test::Unit::TestCase
         assert_nothing_raised {
             OpenSSL::X509::Certificate.new(newtext)
         }
+
+        # Now verify that we can clean a given host's certs
+        assert_nothing_raised {
+            ca.clean("anothertest.domain.com")
+        }
+
+        assert(!File.exists?(cert.certfile), "Cert still exists after clean")
     end
 
     # and now test the autosign file