[open-ils-commits] r7471 - in trunk/Open-ILS: src/perlmods/OpenILS/Application/Storage/CDBI src/perlmods/OpenILS/Application/Storage/Driver/Pg xul/staff_client/server/patron

svn at svn.open-ils.org svn at svn.open-ils.org
Sun Jun 24 23:37:34 EDT 2007


Author: miker
Date: 2007-06-24 23:35:09 -0400 (Sun, 24 Jun 2007)
New Revision: 7471

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm
   trunk/Open-ILS/xul/staff_client/server/patron/user_edit.js
Log:
adding puwom to storage ... work_org setting works now

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm	2007-06-25 02:39:03 UTC (rev 7470)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/permission.pm	2007-06-25 03:35:09 UTC (rev 7471)
@@ -36,5 +36,11 @@
 __PACKAGE__->columns(Primary => qw/id/);
 __PACKAGE__->columns(Essential => qw/grp perm depth grantable/);
 #-------------------------------------------------------------------------------
+package permission::usr_work_ou_map;
+use base qw/permission/;
+__PACKAGE__->table('permission_usr_work_ou_map');
+__PACKAGE__->columns(Primary => qw/id/);
+__PACKAGE__->columns(Essential => qw/usr work_ou/);
+#-------------------------------------------------------------------------------
 1;
 

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm	2007-06-25 02:39:03 UTC (rev 7470)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/dbi.pm	2007-06-25 03:35:09 UTC (rev 7471)
@@ -593,6 +593,12 @@
 
 	#-------------------------------------------------------------------------------
 
+	package permission::usr_work_ou_map;
+	permission::usr_work_ou_map->sequence('permission.usr_work_ou_map_id_seq');
+	permission::usr_work_ou_map->table('permission.usr_work_ou_map');
+
+	#-------------------------------------------------------------------------------
+
 	package permission::usr_perm_map;
 
 	permission::usr_perm_map->sequence( 'permission.usr_perm_map_id_seq' );

Modified: trunk/Open-ILS/xul/staff_client/server/patron/user_edit.js
===================================================================
--- trunk/Open-ILS/xul/staff_client/server/patron/user_edit.js	2007-06-25 02:39:03 UTC (rev 7470)
+++ trunk/Open-ILS/xul/staff_client/server/patron/user_edit.js	2007-06-25 03:35:09 UTC (rev 7471)
@@ -43,8 +43,6 @@
                         user_work_ous.push(p);
                 }
         }
-
-        alert( js2JSON( user_work_ous ) );
 }
 
 function set_perm(row) {
@@ -132,7 +130,7 @@
 		if (pok || wok) {
 			alert(	'User ' + user.usrname() +
 				' [' + user.card().barcode() + '] ' +
-				' successfully modified.  ' + pok + ' permissions and ' + wok + ' work locations updated!');
+				' successfully modified.\n' + pok + ' permissions and ' + wok + ' work locations updated.');
 		}
 
 		init_editor();



More information about the open-ils-commits mailing list