Reviewed tests l*

97 files changed, 582 insertions, 719 deletions

diff --git a/test/_completion_to_review/larch.exp b/test/_completion_to_review/larch.exp
deleted file mode 100644
index bad7768e..00000000
--- a/test/_completion_to_review/larch.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/larch.exp"
diff --git a/test/_completion_to_review/ld.exp b/test/_completion_to_review/ld.exp
deleted file mode 100644
index c2285cbc..00000000
--- a/test/_completion_to_review/ld.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/ld.exp"
diff --git a/test/_completion_to_review/ldd.exp b/test/_completion_to_review/ldd.exp
deleted file mode 100644
index fe9c4002..00000000
--- a/test/_completion_to_review/ldd.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/ldd.exp"
diff --git a/test/_completion_to_review/less.exp b/test/_completion_to_review/less.exp
deleted file mode 100644
index f58cd99b..00000000
--- a/test/_completion_to_review/less.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/less.exp"
diff --git a/test/_completion_to_review/lftp.exp b/test/_completion_to_review/lftp.exp
deleted file mode 100644
index 16d1c95b..00000000
--- a/test/_completion_to_review/lftp.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/lftp.exp"
diff --git a/test/_completion_to_review/links.exp b/test/_completion_to_review/links.exp
deleted file mode 100644
index 776bedda..00000000
--- a/test/_completion_to_review/links.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/links.exp"
diff --git a/test/_completion_to_review/lisp.exp b/test/_completion_to_review/lisp.exp
deleted file mode 100644
index ddd6ad58..00000000
--- a/test/_completion_to_review/lisp.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/lisp.exp"
diff --git a/test/_completion_to_review/list_admins.exp b/test/_completion_to_review/list_admins.exp
deleted file mode 100644
index f4ec2f54..00000000
--- a/test/_completion_to_review/list_admins.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/list_admins.exp"
diff --git a/test/_completion_to_review/list_lists.exp b/test/_completion_to_review/list_lists.exp
deleted file mode 100644
index 705c4d57..00000000
--- a/test/_completion_to_review/list_lists.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/list_lists.exp"
diff --git a/test/_completion_to_review/list_members.exp b/test/_completion_to_review/list_members.exp
deleted file mode 100644
index 4618c03d..00000000
--- a/test/_completion_to_review/list_members.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/list_members.exp"
diff --git a/test/_completion_to_review/list_owners.exp b/test/_completion_to_review/list_owners.exp
deleted file mode 100644
index 8f66acbd..00000000
--- a/test/_completion_to_review/list_owners.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/list_owners.exp"
diff --git a/test/_completion_to_review/ln.exp b/test/_completion_to_review/ln.exp
deleted file mode 100644
index 70d31ffe..00000000
--- a/test/_completion_to_review/ln.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/ln.exp"
diff --git a/test/_completion_to_review/look.exp b/test/_completion_to_review/look.exp
deleted file mode 100644
index 57ed96b4..00000000
--- a/test/_completion_to_review/look.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/look.exp"
diff --git a/test/_completion_to_review/ls.exp b/test/_completion_to_review/ls.exp
deleted file mode 100644
index 6b78b68e..00000000
--- a/test/_completion_to_review/ls.exp
+++ /dev/null
@@ -1 +0,0 @@
-source "lib/completions/ls.exp"
diff --git a/test/completion/.ld.exp.swp b/test/completion/.ld.exp.swp
new file mode 100644
index 00000000..a5ba7407
--- /dev/null
+++ b/test/completion/.ld.exp.swp
diff --git a/test/completion/larch.exp b/test/completion/larch.exp
new file mode 100644
index 00000000..26aef713
--- /dev/null
+++ b/test/completion/larch.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {larch}]} {
+    source "lib/completions/larch.exp"
+}; # if
diff --git a/test/completion/ld.exp b/test/completion/ld.exp
new file mode 100644
index 00000000..92527909
--- /dev/null
+++ b/test/completion/ld.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {ld}]} {
+    source "lib/completions/ld.exp"
+}; # if
diff --git a/test/completion/ldd.exp b/test/completion/ldd.exp
new file mode 100644
index 00000000..20c6fec6
--- /dev/null
+++ b/test/completion/ldd.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {ldd}]} {
+    source "lib/completions/ldd.exp"
+}; # if
diff --git a/test/completion/less.exp b/test/completion/less.exp
new file mode 100644
index 00000000..7ef11573
--- /dev/null
+++ b/test/completion/less.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {less}]} {
+    source "lib/completions/less.exp"
+}; # if
diff --git a/test/completion/lftp.exp b/test/completion/lftp.exp
new file mode 100644
index 00000000..847c6b31
--- /dev/null
+++ b/test/completion/lftp.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {lftp}]} {
+    source "lib/completions/lftp.exp"
+}; # if
diff --git a/test/_completion_to_review/lilo.exp b/test/completion/lilo.exp
index 340509b6..340509b6 100644
--- a/test/_completion_to_review/lilo.exp
+++ b/test/completion/lilo.exp
diff --git a/test/completion/links.exp b/test/completion/links.exp
new file mode 100644
index 00000000..7e871305
--- /dev/null
+++ b/test/completion/links.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {links}]} {
+    source "lib/completions/links.exp"
+}; # if
diff --git a/test/completion/lisp.exp b/test/completion/lisp.exp
new file mode 100644
index 00000000..90ac94fc
--- /dev/null
+++ b/test/completion/lisp.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {lisp}]} {
+    source "lib/completions/lisp.exp"
+}; # if
diff --git a/test/completion/list_admins.exp b/test/completion/list_admins.exp
new file mode 100644
index 00000000..8a39e122
--- /dev/null
+++ b/test/completion/list_admins.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {list_admins}]} {
+    source "lib/completions/list_admins.exp"
+}; # if
diff --git a/test/completion/list_lists.exp b/test/completion/list_lists.exp
new file mode 100644
index 00000000..eb38985a
--- /dev/null
+++ b/test/completion/list_lists.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {list_lists}]} {
+    source "lib/completions/list_lists.exp"
+}; # if
diff --git a/test/completion/list_members.exp b/test/completion/list_members.exp
new file mode 100644
index 00000000..bc6a6639
--- /dev/null
+++ b/test/completion/list_members.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {list_members}]} {
+    source "lib/completions/list_members.exp"
+}; # if
diff --git a/test/completion/list_owners.exp b/test/completion/list_owners.exp
new file mode 100644
index 00000000..0b02658d
--- /dev/null
+++ b/test/completion/list_owners.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {list_owners}]} {
+    source "lib/completions/list_owners.exp"
+}; # if
diff --git a/test/completion/ln.exp b/test/completion/ln.exp
new file mode 100644
index 00000000..cd4b605d
--- /dev/null
+++ b/test/completion/ln.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {ln}]} {
+    source "lib/completions/ln.exp"
+}; # if
diff --git a/test/completion/look.exp b/test/completion/look.exp
new file mode 100644
index 00000000..c99369b1
--- /dev/null
+++ b/test/completion/look.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {look}]} {
+    source "lib/completions/look.exp"
+}; # if
diff --git a/test/completion/ls.exp b/test/completion/ls.exp
new file mode 100644
index 00000000..e1fe643e
--- /dev/null
+++ b/test/completion/ls.exp
@@ -0,0 +1,3 @@
+if {[assert_bash_type {ls}]} {
+    source "lib/completions/ls.exp"
+}; # if
diff --git a/test/_completion_to_review/lvchange.exp b/test/completion/lvchange.exp
index 15d5e262..15d5e262 100644
--- a/test/_completion_to_review/lvchange.exp
+++ b/test/completion/lvchange.exp
diff --git a/test/_completion_to_review/lvcreate.exp b/test/completion/lvcreate.exp
index 06879084..06879084 100644
--- a/test/_completion_to_review/lvcreate.exp
+++ b/test/completion/lvcreate.exp
diff --git a/test/_completion_to_review/lvdisplay.exp b/test/completion/lvdisplay.exp
index 112e2237..112e2237 100644
--- a/test/_completion_to_review/lvdisplay.exp
+++ b/test/completion/lvdisplay.exp
diff --git a/test/_completion_to_review/lvextend.exp b/test/completion/lvextend.exp
index 023c97aa..023c97aa 100644
--- a/test/_completion_to_review/lvextend.exp
+++ b/test/completion/lvextend.exp
diff --git a/test/_completion_to_review/lvm.exp b/test/completion/lvm.exp
index b5cc2fe9..b5cc2fe9 100644
--- a/test/_completion_to_review/lvm.exp
+++ b/test/completion/lvm.exp
diff --git a/test/_completion_to_review/lvmdiskscan.exp b/test/completion/lvmdiskscan.exp
index d5c84cde..d5c84cde 100644
--- a/test/_completion_to_review/lvmdiskscan.exp
+++ b/test/completion/lvmdiskscan.exp
diff --git a/test/_completion_to_review/lvreduce.exp b/test/completion/lvreduce.exp
index f44af764..f44af764 100644
--- a/test/_completion_to_review/lvreduce.exp
+++ b/test/completion/lvreduce.exp
diff --git a/test/_completion_to_review/lvremove.exp b/test/completion/lvremove.exp
index 1f335e9c..1f335e9c 100644
--- a/test/_completion_to_review/lvremove.exp
+++ b/test/completion/lvremove.exp
diff --git a/test/_completion_to_review/lvrename.exp b/test/completion/lvrename.exp
index a3e126c4..a3e126c4 100644
--- a/test/_completion_to_review/lvrename.exp
+++ b/test/completion/lvrename.exp
diff --git a/test/_completion_to_review/lvresize.exp b/test/completion/lvresize.exp
index 0246ffcd..0246ffcd 100644
--- a/test/_completion_to_review/lvresize.exp
+++ b/test/completion/lvresize.exp
diff --git a/test/_completion_to_review/lvs.exp b/test/completion/lvs.exp
index f6a21245..f6a21245 100644
--- a/test/_completion_to_review/lvs.exp
+++ b/test/completion/lvs.exp
diff --git a/test/_completion_to_review/lvscan.exp b/test/completion/lvscan.exp
index 03992b1b..03992b1b 100644
--- a/test/_completion_to_review/lvscan.exp
+++ b/test/completion/lvscan.exp
diff --git a/test/lib/completions/.ld.exp.swp b/test/lib/completions/.ld.exp.swp
new file mode 100644
index 00000000..f018de37
--- /dev/null
+++ b/test/lib/completions/.ld.exp.swp
diff --git a/test/lib/completions/larch.exp b/test/lib/completions/larch.exp
new file mode 100644
index 00000000..076016f2
--- /dev/null
+++ b/test/lib/completions/larch.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "larch library-"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/ld.exp b/test/lib/completions/ld.exp
new file mode 100644
index 00000000..60377991
--- /dev/null
+++ b/test/lib/completions/ld.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "ld "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/ldd.exp b/test/lib/completions/ldd.exp
new file mode 100644
index 00000000..e45d1df7
--- /dev/null
+++ b/test/lib/completions/ldd.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "ldd "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/less.exp b/test/lib/completions/less.exp
new file mode 100644
index 00000000..269c9b5c
--- /dev/null
+++ b/test/lib/completions/less.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "less --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lftp.exp b/test/lib/completions/lftp.exp
new file mode 100644
index 00000000..4bdde376
--- /dev/null
+++ b/test/lib/completions/lftp.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lftp "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lilo.exp b/test/lib/completions/lilo.exp
new file mode 100644
index 00000000..505a1470
--- /dev/null
+++ b/test/lib/completions/lilo.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lilo -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/links.exp b/test/lib/completions/links.exp
new file mode 100644
index 00000000..9f4896aa
--- /dev/null
+++ b/test/lib/completions/links.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "links "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lisp.exp b/test/lib/completions/lisp.exp
new file mode 100644
index 00000000..21663628
--- /dev/null
+++ b/test/lib/completions/lisp.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lisp "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/list_admins.exp b/test/lib/completions/list_admins.exp
new file mode 100644
index 00000000..e1c9c4dd
--- /dev/null
+++ b/test/lib/completions/list_admins.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "list_admins -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/list_lists.exp b/test/lib/completions/list_lists.exp
new file mode 100644
index 00000000..789ab1a8
--- /dev/null
+++ b/test/lib/completions/list_lists.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "list_lists -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/list_members.exp b/test/lib/completions/list_members.exp
new file mode 100644
index 00000000..c93b53d7
--- /dev/null
+++ b/test/lib/completions/list_members.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "list_members -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/list_owners.exp b/test/lib/completions/list_owners.exp
new file mode 100644
index 00000000..c96e0229
--- /dev/null
+++ b/test/lib/completions/list_owners.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "list_owners -"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/ln.exp b/test/lib/completions/ln.exp
new file mode 100644
index 00000000..34786071
--- /dev/null
+++ b/test/lib/completions/ln.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "ln "
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/look.exp b/test/lib/completions/look.exp
new file mode 100644
index 00000000..4224c32d
--- /dev/null
+++ b/test/lib/completions/look.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "look foo"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/ls.exp b/test/lib/completions/ls.exp
new file mode 100644
index 00000000..82e898c8
--- /dev/null
+++ b/test/lib/completions/ls.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "ls --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvchange.exp b/test/lib/completions/lvchange.exp
new file mode 100644
index 00000000..ec3886b8
--- /dev/null
+++ b/test/lib/completions/lvchange.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvchange --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvcreate.exp b/test/lib/completions/lvcreate.exp
new file mode 100644
index 00000000..46dceb79
--- /dev/null
+++ b/test/lib/completions/lvcreate.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvcreate --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvdisplay.exp b/test/lib/completions/lvdisplay.exp
new file mode 100644
index 00000000..5a01a0e5
--- /dev/null
+++ b/test/lib/completions/lvdisplay.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvdisplay --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvextend.exp b/test/lib/completions/lvextend.exp
new file mode 100644
index 00000000..24a63853
--- /dev/null
+++ b/test/lib/completions/lvextend.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvextend --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvm.exp b/test/lib/completions/lvm.exp
new file mode 100644
index 00000000..1c67825e
--- /dev/null
+++ b/test/lib/completions/lvm.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvm pv"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvmdiskscan.exp b/test/lib/completions/lvmdiskscan.exp
new file mode 100644
index 00000000..27e566d4
--- /dev/null
+++ b/test/lib/completions/lvmdiskscan.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvmdiskscan --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvreduce.exp b/test/lib/completions/lvreduce.exp
new file mode 100644
index 00000000..edd5150d
--- /dev/null
+++ b/test/lib/completions/lvreduce.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvreduce --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvremove.exp b/test/lib/completions/lvremove.exp
new file mode 100644
index 00000000..1cd63150
--- /dev/null
+++ b/test/lib/completions/lvremove.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvremove --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvrename.exp b/test/lib/completions/lvrename.exp
new file mode 100644
index 00000000..51624222
--- /dev/null
+++ b/test/lib/completions/lvrename.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvrename --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvresize.exp b/test/lib/completions/lvresize.exp
new file mode 100644
index 00000000..830b9ab1
--- /dev/null
+++ b/test/lib/completions/lvresize.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvresize --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvs.exp b/test/lib/completions/lvs.exp
new file mode 100644
index 00000000..8b239f5d
--- /dev/null
+++ b/test/lib/completions/lvs.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvs --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions/lvscan.exp b/test/lib/completions/lvscan.exp
new file mode 100644
index 00000000..841fd0ed
--- /dev/null
+++ b/test/lib/completions/lvscan.exp
@@ -0,0 +1,20 @@
+proc setup {} {
+    save_env
+}; # setup()
+
+
+proc teardown {} {
+    assert_env_unmodified
+}; # teardown()
+
+
+setup
+
+
+assert_complete_any "lvscan --"
+
+
+sync_after_int
+
+
+teardown
diff --git a/test/lib/completions_to_review/larch.exp b/test/lib/completions_to_review/larch.exp
deleted file mode 100644
index aadd4615..00000000
--- a/test/lib/completions_to_review/larch.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "larch library-"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/ld.exp b/test/lib/completions_to_review/ld.exp
deleted file mode 100644
index 429250d6..00000000
--- a/test/lib/completions_to_review/ld.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "ld "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/ldd.exp b/test/lib/completions_to_review/ldd.exp
deleted file mode 100644
index 42af5981..00000000
--- a/test/lib/completions_to_review/ldd.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "ldd "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/less.exp b/test/lib/completions_to_review/less.exp
deleted file mode 100644
index d833adee..00000000
--- a/test/lib/completions_to_review/less.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "less "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lftp.exp b/test/lib/completions_to_review/lftp.exp
deleted file mode 100644
index eeac0c79..00000000
--- a/test/lib/completions_to_review/lftp.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lftp "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lilo.exp b/test/lib/completions_to_review/lilo.exp
deleted file mode 100644
index b2f46019..00000000
--- a/test/lib/completions_to_review/lilo.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lilo -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/links.exp b/test/lib/completions_to_review/links.exp
deleted file mode 100644
index e08e624c..00000000
--- a/test/lib/completions_to_review/links.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "links "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lisp.exp b/test/lib/completions_to_review/lisp.exp
deleted file mode 100644
index 1afe40cc..00000000
--- a/test/lib/completions_to_review/lisp.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lisp "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/list_admins.exp b/test/lib/completions_to_review/list_admins.exp
deleted file mode 100644
index 7006f9b5..00000000
--- a/test/lib/completions_to_review/list_admins.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "list_admins -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/list_lists.exp b/test/lib/completions_to_review/list_lists.exp
deleted file mode 100644
index 332b0218..00000000
--- a/test/lib/completions_to_review/list_lists.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "list_lists -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/list_members.exp b/test/lib/completions_to_review/list_members.exp
deleted file mode 100644
index 5d9dd085..00000000
--- a/test/lib/completions_to_review/list_members.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "list_members -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/list_owners.exp b/test/lib/completions_to_review/list_owners.exp
deleted file mode 100644
index 065635b8..00000000
--- a/test/lib/completions_to_review/list_owners.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "list_owners -"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/ln.exp b/test/lib/completions_to_review/ln.exp
deleted file mode 100644
index aa2faaa5..00000000
--- a/test/lib/completions_to_review/ln.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "ln "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/look.exp b/test/lib/completions_to_review/look.exp
deleted file mode 100644
index 38eb1a50..00000000
--- a/test/lib/completions_to_review/look.exp
+++ /dev/null
@@ -1,29 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "look foo "
-send "$cmd\t"
-  # NOTE: Wait in case `look' returns nothing, so that "^$cdm.*$" doesn't match
-  #       too early -- before comp_install has finished
-sleep .4
-expect {
-    -re "^${cmd}(bash: look: command not found\r\n|)\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/ls.exp b/test/lib/completions_to_review/ls.exp
deleted file mode 100644
index d4332951..00000000
--- a/test/lib/completions_to_review/ls.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "ls "
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvchange.exp b/test/lib/completions_to_review/lvchange.exp
deleted file mode 100644
index d07a129b..00000000
--- a/test/lib/completions_to_review/lvchange.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvchange --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvcreate.exp b/test/lib/completions_to_review/lvcreate.exp
deleted file mode 100644
index 1a24d6a5..00000000
--- a/test/lib/completions_to_review/lvcreate.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvcreate --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvdisplay.exp b/test/lib/completions_to_review/lvdisplay.exp
deleted file mode 100644
index 4ba2be5f..00000000
--- a/test/lib/completions_to_review/lvdisplay.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvdisplay --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvextend.exp b/test/lib/completions_to_review/lvextend.exp
deleted file mode 100644
index 60195ce8..00000000
--- a/test/lib/completions_to_review/lvextend.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvextend --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvm.exp b/test/lib/completions_to_review/lvm.exp
deleted file mode 100644
index e9403a41..00000000
--- a/test/lib/completions_to_review/lvm.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvm pv"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvmdiskscan.exp b/test/lib/completions_to_review/lvmdiskscan.exp
deleted file mode 100644
index eb219e56..00000000
--- a/test/lib/completions_to_review/lvmdiskscan.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvmdiskscan --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvreduce.exp b/test/lib/completions_to_review/lvreduce.exp
deleted file mode 100644
index 6c3f1411..00000000
--- a/test/lib/completions_to_review/lvreduce.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvreduce --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvremove.exp b/test/lib/completions_to_review/lvremove.exp
deleted file mode 100644
index 35ba530d..00000000
--- a/test/lib/completions_to_review/lvremove.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvremove --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvrename.exp b/test/lib/completions_to_review/lvrename.exp
deleted file mode 100644
index fd3102d3..00000000
--- a/test/lib/completions_to_review/lvrename.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvrename --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvresize.exp b/test/lib/completions_to_review/lvresize.exp
deleted file mode 100644
index ce441983..00000000
--- a/test/lib/completions_to_review/lvresize.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvresize --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvs.exp b/test/lib/completions_to_review/lvs.exp
deleted file mode 100644
index 231099eb..00000000
--- a/test/lib/completions_to_review/lvs.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvs --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown
diff --git a/test/lib/completions_to_review/lvscan.exp b/test/lib/completions_to_review/lvscan.exp
deleted file mode 100644
index e50a7f92..00000000
--- a/test/lib/completions_to_review/lvscan.exp
+++ /dev/null
@@ -1,26 +0,0 @@
-proc setup {} {
-}; # setup()
-
-
-proc teardown {} {
-}; # teardown()
-
-
-setup
-
-
-set test "Tab should complete"
-    # Try completion
-set cmd "lvscan --"
-send "$cmd\t"
-expect {
-    -re "^$cmd\r\n.*$cmd$" { pass "$test" }
-    -re /@ { unresolved "$test at prompt" }
-    -re eof { unresolved "eof" }
-}; # expect
-
-
-sync_after_int
-
-
-teardown