[geeklog-cvs] tools/lm/include core.inc,1.1,1.2

[Dirk Haun]

Update of /cvsroot/geeklog/tools/lm/include
In directory qs1489.pair.com:/tmp/cvs-serv8862/include

Modified Files:
	core.inc 
Log Message:
Special fix for a common URL mistake in some language files


Index: core.inc
===================================================================
RCS file: /cvsroot/geeklog/tools/lm/include/core.inc,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** core.inc	27 Apr 2008 17:11:13 -0000	1.1
--- core.inc	1 May 2008 20:10:38 -0000	1.2
***************
*** 32,35 ****
--- 32,48 ----
  // $Id$
  
+ /**
+ * Helper function: Fix URL in some language files
+ *
+ */
+ function Core_fix_storydenialmsg(&$access)
+ {
+     if (isset($access['storydenialmsg'])) {
+         $access['storydenialmsg'] = str_replace('<a href=users.php?mode=new>',
+                     '<a href="{$_CONF[\'site_url\']}/users.php?mode=new">',
+                     $access['storydenialmsg']);
+     }
+ }
+ 
  // save the english text strings
  $ENG01 = $LANG01;
***************
*** 161,164 ****
--- 174,178 ----
  
  mergeArrays($ENGMS,  $MESSAGE, 'MESSAGE', 'confirmation and error messages');
+ Core_fix_storydenialmsg($LANG_ACCESS);
  mergeArrays($ENGAC,  $LANG_ACCESS, 'LANG_ACCESS');
  mergeArrays($ENGDB,  $LANG_DB_BACKUP, 'LANG_DB_BACKUP', 'admin/database.php');