diff options
author | Bharat Mediratta <bharat@menalto.com> | 2008-10-31 22:12:14 +0000 |
---|---|---|
committer | Bharat Mediratta <bharat@menalto.com> | 2008-10-31 22:12:14 +0000 |
commit | eba717f95f586d2538007bd18da6e9b32b076c30 (patch) | |
tree | 15fc596a270f9de0d163c66c96e3c65fca5ee100 /kohana/core/utf8/rtrim.php | |
parent | fff10f8b70376ef25722bd867df26bc5aefced43 (diff) |
Merge over vendor code.
git-svn-id: http://gallery.svn.sourceforge.net/svnroot/gallery/trunk/eval/gx/gallery3/trunk@18408 57fcd75e-5312-0410-8df3-f5eb6fbb1595
Diffstat (limited to 'kohana/core/utf8/rtrim.php')
-rw-r--r-- | kohana/core/utf8/rtrim.php | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/kohana/core/utf8/rtrim.php b/kohana/core/utf8/rtrim.php new file mode 100644 index 00000000..c7571eb2 --- /dev/null +++ b/kohana/core/utf8/rtrim.php @@ -0,0 +1,22 @@ +<?php defined('SYSPATH') or die('No direct script access.'); +/** + * utf8::rtrim + * + * @package Core + * @author Kohana Team + * @copyright (c) 2007 Kohana Team + * @copyright (c) 2005 Harry Fuecks + * @license http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt + */ +function _rtrim($str, $charlist = NULL) +{ + if ($charlist === NULL) + return rtrim($str); + + if (utf8::is_ascii($charlist)) + return rtrim($str, $charlist); + + $charlist = preg_replace('#[-\[\]:\\\\^/]#', '\\\\$0', $charlist); + + return preg_replace('/['.$charlist.']++$/uD', '', $str); +}
\ No newline at end of file |