50 lines
1.0 KiB
Plaintext
50 lines
1.0 KiB
Plaintext
proc setup {} {
|
|
save_env
|
|
}
|
|
|
|
|
|
proc teardown {} {
|
|
assert_env_unmodified
|
|
}
|
|
|
|
|
|
setup
|
|
|
|
|
|
assert_complete_any "slapt-src -"
|
|
|
|
|
|
sync_after_int
|
|
|
|
|
|
set test "--bu<TAB> should complete \"--build\""
|
|
assert_complete "--build" "slapt-src --bu" $test
|
|
|
|
|
|
sync_after_int
|
|
|
|
|
|
set test "--ins<TAB> should complete \"--install\""
|
|
assert_complete "--install" "slapt-src --ins" $test
|
|
|
|
|
|
sync_after_int
|
|
|
|
|
|
set test "--install should complete available packages"
|
|
set config $::srcdir/fixtures/slackware/etc/slapt-get/slapt-srcrc
|
|
set workdir [file normalize $::srcdir/fixtures/slackware/usr/src/slapt-src/]
|
|
set slb_data "$workdir/slackbuilds_data"
|
|
set f [open $config w]; puts $f "BUILDDIR=$workdir"; close $f
|
|
set slackbuilds [split [exec bash -c "sed -n \
|
|
-e '/^SLACKBUILD NAME: /{s/^SLACKBUILD NAME: \\{1,\\}//;p}' \
|
|
-e '/^SLACKBUILD VERSION: /{s/^SLACKBUILD VERSION: \\{1,\\}//;p}' \
|
|
$slb_data | sed -e 'N;s/\\n/:/'"] "\n"]
|
|
assert_complete $slackbuilds "slapt-src --config $config --install " $test
|
|
|
|
|
|
sync_after_int
|
|
|
|
|
|
teardown
|