# 
# add_file "tests/t_drop_attr.at"
# 
# patch "ChangeLog"
#  from [1deb816300c65f2999dd5730a0b50410c26f8de6]
#    to [bfaa50c4660f659a1ed887edfe6bbab8ad1df22a]
# 
# patch "tests/t_drop_attr.at"
#  from []
#    to [68392ef89463df3f259d3b938777e4eced346cdf]
# 
# patch "testsuite.at"
#  from [78e75421c02747bc50d1966394370014a1e16858]
#    to [ad46f27935bb196f680685cf791df03ebb29aad3]
# 
--- ChangeLog
+++ ChangeLog
@@ -1,3 +1,8 @@
+2005-04-18  Richard Levitte  <address@hidden>
+
+	* tests/t_drop_attr.at: New test, similar to t_rename_attr.at.
+	* testsuite.at: Add it.
+
 2005-04-17  Henrik Holmboe <address@hidden>
 
 	* contrib/monotone-notify.pl: Add signal handlers.  Correct some
--- tests/t_drop_attr.at
+++ tests/t_drop_attr.at
@@ -0,0 +1,21 @@
+AT_SETUP([drop removes attributes])
+MONOTONE_SETUP
+
+# This test is a bug report.
+AT_XFAIL_IF(true)
+
+ADD_FILE(testfile, [foo bar
+])
+AT_CHECK(MONOTONE attr set testfile some_key some_value, [], [ignore], [ignore])
+AT_CHECK(MONOTONE attr get testfile, [], [stdout], [ignore])
+AT_CHECK(grep -q some_key stdout)
+AT_CHECK(grep -q some_value stdout)
+
+COMMIT(testbranch)
+
+AT_CHECK(MONOTONE drop testfile, [], [ignore], [ignore])
+AT_CHECK(MONOTONE attr get testfile, [1], [ignore], [ignore])
+AT_CHECK(grep -q some_key stdout)
+AT_CHECK(grep -q some_value stdout)
+
+AT_CLEANUP
--- testsuite.at
+++ testsuite.at
@@ -565,3 +565,4 @@
 m4_include(tests/t_add_stomp_file.at)
 m4_include(tests/t_database_check_minor.at)
 m4_include(tests/t_db_kill_rev_locally.at)
+m4_include(tests/t_drop_attr.at)