Author: shadzik
Date: Sat Oct 31 04:39:56 2009
New Revision: 10911
Modified:
toys/stbr/stbr.tcl
Log:
- enhanced pub:stat to show link if spec exists
Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl (original)
+++ toys/stbr/stbr.tcl Sat Oct 31 04:39:56 2009
@@ -157,10 +157,11 @@
}
if {([string match HEAD $branch])} {set cmd "-N"} else {set cmd "-r$branch"}
if {[catch {exec cvs -d $cvsroot rlog $cmd packages/$pkg/$spec} results]} {
- putserv "privmsg $chan :$nick: There is no such spec ($spec) on branch
$branch in PLD's repository."
+ putserv "privmsg $chan :$nick: ${sp...@${branch} doesn't exist in PLD's
repository."
return 0
}
- putserv "privmsg $chan :$nick: Spec ($spec) exists on branch $branch in
PLD's repository."
+ set link
"http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/packages/$pkg/$spec?only_with_tag=$branch";
+ putserv "privmsg $chan :$nick: ${sp...@${branch} exists in PLD's
repository. Go see it at $link"
return 0
}
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
