rev 312 - in trunk: modules/File src

SVN User <[email protected]>
Newsgroups gmane.comp.lang.prothon.cvs
Message-ID <[email protected]>
Author: mark
Date: 2004-04-09 19:14:37 -0400 (Fri, 09 Apr 2004)
New Revision: 312

Modified:
   trunk/modules/File/File.c
   trunk/src/interp.c
Log:
fixed permission problem when importing,
added Object.get_read_access(), Object.get_write_access(),
and Object.set_read_access(), Object.set_write_access(),
added doc string to File proto object


Modified: trunk/modules/File/File.c
===================================================================
--- trunk/modules/File/File.c	2004-04-09 22:29:23 UTC (rev 311)
+++ trunk/modules/File/File.c	2004-04-09 23:14:37 UTC (rev 312)
@@ -121,6 +121,7 @@
 MODULE_START(File)
 {
 	File_OBJ = new_object(ist, NULL);
+	add_doc_to_obj(ist, File_OBJ, "File object prototype");
 	MODULE_ADD_TO_BASE(File);
 }
 

Modified: trunk/src/interp.c
===================================================================
--- trunk/src/interp.c	2004-04-09 22:29:23 UTC (rev 311)
+++ trunk/src/interp.c	2004-04-09 23:14:37 UTC (rev 312)
@@ -314,6 +314,7 @@
 
 //******************************** load_dll_module *****************************
 int load_dll_module(isp ist, char* full_path, char* module_name, obj_p dest_module, obj_p alias){
+	int i;
 	obj_p module;
 	apr_dso_handle_t *handle;
 	apr_dso_handle_sym_t dll_entry;
@@ -343,9 +344,11 @@
 
 	((void(*)(pr_services_t*))dll_entry)(&dll_services);
 
-	if ((module = get_attr(ist, OBJ(MODULES), sym(ist, module_name))) && dest_module)
+	if ((module = get_attr(ist, OBJ(MODULES), sym(ist, module_name))) && dest_module){
+		su(i);
 		set_attr(ist, dest_module, alias, module);
-
+		un_su(i);
+	}
 	return TRUE;
 }
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.