function gotwo_update_5100 in Go - url redirects 5

Same name and namespace in other branches

1. 6 gotwo.install \gotwo_update_5100()

File

./gotwo.install, line 48

Installation script for the go.module

Code

function gotwo_update_5100() {
  $ret = array();
  $res = db_query("SELECT rid,perm FROM {permission}");
  $perms = array();
  while ($p = db_fetch_object($res)) {
    $perm = $p->perm;
    $perm = preg_replace('/Administrative Settings/', 'administer gotwo', $perm);
    $perm = preg_replace('/view entry list/', 'view gotwo entries', $perm);
    $perm = preg_replace('/edit entries/', 'edit gotwo entries', $perm);
    $perms[$p->rid] = $perm;
  }
  foreach (array_keys($perms) as $rid) {
    db_query("UPDATE {permission} SET perm = '%s' WHERE rid = %d", $perms[$rid], $rid);
  }
  return $ret;
}