From 5daf5d3589c7d1e351005971ce71096735939a0f Mon Sep 17 00:00:00 2001
From: nicolasconnault <nicolasconnault>
Date: Thu, 16 Jul 2009 03:21:19 +0000
Subject: [PATCH] MDL-19840 Fixed a bug in regex delimiter quoting

---
 lib/simpletest/testsimpletestlib.php | 5 +++++
 lib/simpletestlib.php                | 8 ++++----
 2 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/lib/simpletest/testsimpletestlib.php b/lib/simpletest/testsimpletestlib.php
index be95ac60f6..1f775e28b7 100644
--- a/lib/simpletest/testsimpletestlib.php
+++ b/lib/simpletest/testsimpletestlib.php
@@ -52,6 +52,11 @@ class ContainsTagWithAttribute_test extends UnitTestCase {
         $expectation = new ContainsTagWithAttribute('span', 'class', 'error');
         $this->assertFalse($expectation->test('<span class="mismatch">message</span>'));
     }
+
+    function test_link() {
+        $expectation = new ContainsTagWithAttribute('a', 'href', 'http://www.test.com');
+        $this->assertTrue($expectation->test('<a href="http://www.test.com">Click Here</a>'));
+    }
 }
 
 /**
diff --git a/lib/simpletestlib.php b/lib/simpletestlib.php
index feb674cfef..af83fb9b5e 100644
--- a/lib/simpletestlib.php
+++ b/lib/simpletestlib.php
@@ -209,8 +209,8 @@ class ContainsTagWithAttribute extends SimpleExpectation {
     }
 
     function test($html) {
-        $regex = '/<' . preg_quote($this->tag) . self::ATTRSREGEX .
-                '(?:\s+' . preg_quote($this->attribute) . '\s*=\s*["\']' . preg_quote($this->value) . '["\'])' .
+        $regex = '/<' . preg_quote($this->tag, '/') . self::ATTRSREGEX .
+                '(?:\s+' . preg_quote($this->attribute, '/') . '\s*=\s*["\']' . preg_quote($this->value, '/') . '["\'])' .
                 self::ATTRSREGEX . '\s*>/';
         return preg_match($regex, $html);
     }
@@ -241,8 +241,8 @@ class ContainsTagWithContents extends SimpleExpectation {
     }
 
     function test($html) {
-        $regex = '/<' . preg_quote($this->tag) . self::ATTRSREGEX . '\s*>' . preg_quote($this->content) .
-                '<\/' . preg_quote($this->tag) . '>/';
+        $regex = '/<' . preg_quote($this->tag, '/') . self::ATTRSREGEX . '\s*>' . preg_quote($this->content, '/') .
+                '<\/' . preg_quote($this->tag, '/') . '>/';
         return preg_match($regex, $html);
     }
 
-- 
2.39.5