Changeset 1810 for trunk/wp-admin/admin-functions.php

Timestamp:

10/18/2004 04:50:08 AM (20 years ago)

Author:

rboren

Message:

Do not stomp permalink setting. Bug 372.

File:

• trunk/wp-admin/admin-functions.php (modified) (1 diff)

trunk/wp-admin/admin-functions.php

@@ -623 +623 @@
 }
 
+function user_can_access_admin_page() {
+    global $parent_file;
+    global $pagenow;
+    global $menu;
+    global $submenu;
+    global $user_level;
+
+    if (! isset($parent_file)) {
+        $parent = $pagenow;
+    } else {
+        $parent = $parent_file;
+    }
+
+    foreach ($menu as $menu_array) {
+        //echo "parent array: " . $menu_array[2];
+        if ($menu_array[2] == $parent) {
+            if ($user_level < $menu_array[1]) {
+                return false;
+            } else {
+                break;
+            }
+        }
+    }
+
+    if (isset($submenu[$parent])) {
+        foreach ($submenu[$parent] as $submenu_array) {
+            if ($submenu_array[2] == $pagenow) {
+                if ($user_level < $submenu_array[1]) {
+                    return false;
+                } else {
+                    return true;
+                }
+            }
+        }
+    }
+    
+    return true;
+}
+
+function add_options_menu($title, $access_level, $file) {
+    global $submenu;
+    
+    $submenu['options-general.php'][] = array($title, $access_level, $file);
+}
+
 ?>