Permalink
Browse files

[#26875895] Create helper function BranchesAreSiblings

  • Loading branch information...
1 parent 9703efc commit ddd25f8cf3aea195d0e608b00b5087f5e631ff0e @ctfliblime ctfliblime committed Mar 22, 2012
Showing with 6 additions and 0 deletions.
  1. +6 −0 lib/C4/Branch.pm
View
@@ -428,6 +428,12 @@ sub GetSiblingBranchesOfType {
return @branchcodes;
}
+sub BranchesAreSiblings {
+ my ($b1code, $b2code, $categorytype) = @_;
+ my @b1_group = GetSiblingBranchesOfType($b1code, $categorytype);
+ return $b2code ~~ @b1_group;
+}
+
=head2 GetBranch
$branch = GetBranch( $query, $branches );

0 comments on commit ddd25f8

Please sign in to comment.