bundles: Test shape loading from bundle

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/apitest/at-otter.rs b/apitest/at-otter.rs
index df1b40ad8f9879688b59bc7fd5f4dadaec03aeaf..ca7af1b87a7777dfa26571d2029d6479ffbad981 100644 (file)
--- a/apitest/at-otter.rs
+++ b/apitest/at-otter.rs
@@ -733,6 +733,18 @@ impl Ctx {
     let st = Command::new("cmp").args(&[&bundle_file, "00000.zip"]).status()?;
     if ! st.success() { panic!("cmp failed {}", st) }
 
+    let command = ds.ss("library-add @table@ lemon example-lemon")?;
+    let added = self.some_library_add(&command)?;
+    assert_eq!( added.len(), 1 );
+
+    let output: String = self.otter(&ds.ss("list-pieces @table@")?)?.into();
+    assert!( Regex::new(
+      r#"(?m)(?:[^\w-]|^)example-lemon[^\w-].*\Wa lemon(?:\W|$)"#
+    )?
+             .find(&output)
+             .is_some(),
+             "got: {}", &output);
+
     self.otter(&ds.ss("clear-game @table@")?)?;
     self.otter(&ds.ss("reset @table@ demo")?)?;
   }