1 files changed, 83 insertions, 0 deletions
diff --git a/includes/pear/Text/Wiki/Parse/Creole/Underline.php b/includes/pear/Text/Wiki/Parse/Creole/Underline.php
new file mode 100644
index 0000000..c3d5b14
--- /dev/null
+++ b/includes/pear/Text/Wiki/Parse/Creole/Underline.php
@@ -0,0 +1,83 @@
+<?php
+
+/**
+ *
+ * Parses for italic text.
+ *
+ * This class implements a Text_Wiki_Parse to find source text marked for
+ * underlined as defined by text surrounded by two '_'.
+ * On parsing, the text itself is left in place, but the starting and ending
+ * instances of two '^' are replaced with tokens.
+ *
+ * @category Text
+ *
+ * @package Text_Wiki
+ *
+ * @author Paul M. Jones <pmjones@php.net>
+ * @author Michele Tomaiuolo <tomamic@yahoo.it>
+ *
+ * @license LGPL
+ *
+ * @version $Id: Underline.php 242127 2007-09-03 21:29:36Z mic $
+ *
+ */
+
+class Text_Wiki_Parse_Underline extends Text_Wiki_Parse {
+
+
+    /**
+     *
+     * The regular expression used to parse the source text and find
+     * matches conforming to this rule.  Used by the parse() method.
+     *
+     * @access public
+     *
+     * @var string
+     *
+     * @see parse()
+     *
+     */
+
+    var $regex =  "/__(.+?)__/";
+    //var $regex =  "/(?:\_\_(.+?)\_\_|(?:(?<=[\W_\xFF])\_(?![ \_]))(.+?)(?:(?<![ \_])\_(?=[\W_\xFF])))/";
+
+    /**
+     *
+     * Generates a replacement for the matched text.  Token options are:
+     *
+     * 'type' => ['start'|'end'] The starting or ending point of the
+     * superscript text.  The text itself is left in the source.
+     *
+     * @access public
+     *
+     * @param array &$matches The array of matches from parse().
+     *
+     * @return string A pair of delimited tokens to be used as a
+     * placeholder in the source text surrounding the text to be
+     * superscripted.
+     *
+     */
+
+    function process(&$matches)
+    {
+        $text = $matches[1];
+        //$text = $matches[1] ? $matches[1] : $matches[2];
+        
+        if (! $this->wiki->checkInnerTags($text)) {
+            return $matches[0];
+        }
+
+        $start = $this->wiki->addToken(
+            $this->rule,
+            array('type' => 'start')
+        );
+
+        $end = $this->wiki->addToken(
+            $this->rule,
+            array('type' => 'end')
+        );
+
+        return $start . $text . $end;
+    }
+}
+?>
+\ No newline at end of file