Commit 06aadcfcae2e181410dbb4b1702ba581be11ad4e

Authored by Neil Blakey-Milner
1 parent 1fc0e72b

Log more information about this edge-case-that-won't-die.


git-svn-id: https://kt-dms.svn.sourceforge.net/svnroot/kt-dms/trunk@5400 c91229c3-7414-0410-bfa2-8a42b809f60b
lib/permissions/permissionutil.inc.php
... ... @@ -83,6 +83,7 @@ class KTPermissionUtil {
83 83 $sDescriptor = KTPermissionUtil::generateDescriptor($aAllowed);
84 84 $oDescriptor =& KTPermissionDescriptor::getByDescriptor(md5($sDescriptor));
85 85 if (PEAR::isError($oDescriptor)) {
  86 + $oOriginalDescriptor = $oDescriptor;
86 87  
87 88 $oDescriptor =& KTPermissionDescriptor::createFromArray(array(
88 89 "descriptortext" => $sDescriptor,
... ... @@ -91,8 +92,15 @@ class KTPermissionUtil {
91 92 print '<pre>';
92 93 print_r($aAllowed);
93 94 print "-----------\n";
  95 + print "getOrCreateDescriptor get error (should be 'not found'):";
  96 + print "-----------\n";
  97 + print_r($oOriginalDescriptor);
  98 + print "-----------\n";
  99 + print "getOrCreateDescriptor create error (should not happen):";
  100 + print "-----------\n";
94 101 print_r($oDescriptor);
95 102 print '</pre>';
  103 + exit(0);
96 104 }
97 105 $oDescriptor->saveAllowed($aAllowed);
98 106  
... ...