/**
* Class for working with PO files
*
- * @version $Id: po.php 406 2010-02-07 11:10:24Z nbachiyski $
+ * @version $Id: po.php 589 2010-12-18 01:40:57Z nbachiyski $
* @package pomo
* @subpackage po
*/
*/
if ( !class_exists( 'PO' ) ):
class PO extends Gettext_Translations {
-
+
+ var $comments_before_headers = '';
/**
* Exports headers to a PO entry
$header_string.= "$header: $value\n";
}
$poified = PO::poify($header_string);
- return rtrim("msgid \"\"\nmsgstr $poified");
+ if ($this->comments_before_headers)
+ $before_headers = $this->prepend_each_line(rtrim($this->comments_before_headers)."\n", '# ');
+ else
+ $before_headers = '';
+ return rtrim("{$before_headers}msgid \"\"\nmsgstr $poified");
}
/**
if (false === $res) return false;
return fclose($fh);
}
+
+ /**
+ * Text to include as a comment before the start of the PO contents
+ *
+ * Doesn't need to include # in the beginning of lines, these are added automatically
+ */
+ function set_comment_before_headers( $text ) {
+ $this->comments_before_headers = $text;
+ }
/**
* Formats a string in PO-style
$po = str_replace("$newline$quote$quote", '', $po);
return $po;
}
-
+
/**
* Gives back the original string from a PO-formatted string
- *
+ *
* @static
* @param string $string PO-formatted string
* @return string enascaped string
}
/**
- * Inserts $with in the beginning of every new line of $string and
+ * Inserts $with in the beginning of every new line of $string and
* returns the modified string
*
* @static
PO::read_line($f, 'clear');
return $res !== false;
}
-
+
function read_entry($f, $lineno = 0) {
$entry = new Translation_Entry();
// where were we in the last step
return false;
}
// add comment
- $this->add_comment_to_entry($entry, $line);
+ $this->add_comment_to_entry($entry, $line);;
} elseif (preg_match('/^msgctxt\s+(".*")/', $line, $m)) {
if ($is_final($context)) {
PO::read_line($f, 'put-back');
}
return array('entry' => $entry, 'lineno' => $lineno);
}
-
+
function read_line($f, $action = 'read') {
static $last_line = '';
static $use_last_line = false;
$use_last_line = false;
return $line;
}
-
+
function add_comment_to_entry(&$entry, $po_comment_line) {
$first_two = substr($po_comment_line, 0, 2);
$comment = trim(substr($po_comment_line, 2));
$entry->translator_comments = trim($entry->translator_comments . "\n" . $comment);
}
}
-
+
function trim_quotes($s) {
if ( substr($s, 0, 1) == '"') $s = substr($s, 1);
if ( substr($s, -1, 1) == '"') $s = substr($s, 0, -1);
return $s;
}
}
-endif;
+endif;
\ No newline at end of file