prefs refactoring: partial implementation (wip)
[brisk.git] / web / Obj / user.phh
index a1bc74d..3d09ceb 100644 (file)
@@ -920,6 +920,30 @@ function chunked_fini()
     return sprintf("0\r\n");
 }
 
+function prefsn_get()
+{
+    GLOBAL $G_lang, $mlang_brisk, $G_base;
+
+    $mesg = "";
+    $user_code = -1;
+
+    $listen = ($this->flags & USER_FLAG_MAP_AUTH) >> 2;
+    if ($this->rec != FALSE) {
+        $ret = $this->rec->supp_comp_get_array();
+    }
+    else {
+        $ret = array(
+                     "fg" => array("r" => 0, "g" => 0, "b" => 0),
+                     "bg" => array("r" => 0, "g" => 0, "b" => 0)
+                     );
+    }
+
+    return (array("ret" => 0,
+                  "listen" => $listen,
+                  "fg" => $ret["fg"],
+                  "bg" => $ret["bg"]));
+}
+
 
 } // end class User