@@ -249,6 +249,7 @@ sub launder_check_plan () {
Avail => 1,
Info => $cshare->{Type},
PreviousShare => $cshare,
+ Shares => $cshare->{Shares},
};
$cshare= undef;
}
@@ -678,6 +679,7 @@ sub cmd_show_html () {
foreach my $evt (@{ $plan->{Events}{$reso} }) {
my $type= $evt->{Type};
my $share= $evt->{Share};
+ next if $type eq 'Unshare' && $evt->{Shares} == 1;
my $show=
$type eq End ? ($evt->{Share} ? "End $evt->{Info}" : "") :
$type eq Unshare ? "$type [".showsharetype($evt->{Info})."]" :
@@ -686,7 +688,7 @@ sub cmd_show_html () {
(!$evt->{Allocated} ? Booking :
($evt->{Allocated}{Live} ? Allocation : Completed).
" $evt->{Allocated}{Task}")." ".$evt->{Info};
- if ($share) {
+ if ($share && $share->{Shares} != 1) {
$show .= sprintf(" [%s %d/%d %d]",
showsharetype($share->{Type}),
$share->{Shares} - $evt->{Avail},
@@ -789,7 +791,8 @@ sub cmd_show_html () {
$content->{Avail} ||
$content->{Type} eq After ||
($content->{Allocated} && !$content->{Allocated}{Live});
- my $shared = $content->{Share};
+ my $shared = $content->{Share}
+ && $content->{Share}{Shares} != 1;
my $bgcolour=
$avail ?
($shared ? "#ccccff" : "#ffffff") :