Index: includes/locale.inc =================================================================== RCS file: /cvs/drupal/drupal/includes/locale.inc,v retrieving revision 1.105.2.1 diff -u -p -r1.105.2.1 locale.inc --- includes/locale.inc 24 Mar 2007 19:09:25 -0000 1.105.2.1 +++ includes/locale.inc 29 Mar 2007 16:08:55 -0000 @@ -534,7 +534,7 @@ function _locale_import_read_po($op, $fi $current["#"][] = substr($line, 1); } elseif (($context == "MSGSTR") || ($context == "MSGSTR_ARR")) { // End current entry, start a new one - _locale_import_one_string($op, $current, $mode, $lang); + _locale_import_one_string($op, $current, $mode, $lang, $file); $current = array(); $current["#"][] = substr($line, 1); $context = "COMMENT"; @@ -560,7 +560,7 @@ function _locale_import_read_po($op, $fi } elseif (!strncmp("msgid", $line, 5)) { if ($context == "MSGSTR") { // End current entry, start a new one - _locale_import_one_string($op, $current, $mode, $lang); + _locale_import_one_string($op, $current, $mode, $lang, $file); $current = array(); } elseif ($context == "MSGID") { // Already in this context? Parse error @@ -634,7 +634,7 @@ function _locale_import_read_po($op, $fi // End of PO file, flush last entry if (($context == "MSGSTR") || ($context == "MSGSTR_ARR")) { - _locale_import_one_string($op, $current, $mode, $lang); + _locale_import_one_string($op, $current, $mode, $lang, $file); } elseif ($context != "COMMENT") { _locale_import_message('The translation file %filename ended unexpectedly at line %line.', $file, $lineno); @@ -673,8 +673,10 @@ function _locale_import_message($message * Should existing translations be replaced ('overwrite' or 'keep') * @param $lang * Language to store the string in + * @param $file + * Object representation of file being imported, only required when op is 'db-store' */ -function _locale_import_one_string($op, $value = NULL, $mode = NULL, $lang = NULL) { +function _locale_import_one_string($op, $value = NULL, $mode = NULL, $lang = NULL, $file = NULL) { static $additions = 0; static $updates = 0; static $headerdone = FALSE;