Merged revisions 9669 via svnmerge from

svn://svn.open-ils.org/ILS/trunk

........
  r9669 | erickson | 2008-05-22 15:41:29 -0400 (Thu, 22 May 2008) | 1 line

  putting shortname into the generated org tree
........

git-svn-id: svn://svn.open-ils.org/ILS/branches/acq-experiment@9670 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/extras/org_tree_js.pl b/Open-ILS/src/extras/org_tree_js.pl
index 9ef9ac2..342b576 100644 (file)
--- a/Open-ILS/src/extras/org_tree_js.pl
+++ b/Open-ILS/src/extras/org_tree_js.pl
@@ -50,9 +50,9 @@ my $pile = "var _l = [";
 
 my @array;
 for my $o (@$tree) {
-       my ($i,$t,$p,$n,$v) = ($o->id,$o->ou_type,$o->parent_ou,val($o->name),val($o->opac_visible));
+       my ($i,$t,$p,$n,$v,$s) = ($o->id,$o->ou_type,$o->parent_ou,val($o->name),val($o->opac_visible),val($o->shortname));
     $p ||= 'null';
-       push @array, "[$i,$t,$p,$n,$v]";
+       push @array, "[$i,$t,$p,$n,$v,$s]";
 }
 
 $pile .= join ',', @array;