Changeset 5810 for trunk/core/lib/Foswiki/Attrs.pm

Timestamp:

12/17/09 19:28:55 (2 years ago)

Author:

CrawfordCurrie

Message:

Item2511: split macros out of the Foswiki.pm monster

File:

• trunk/core/lib/Foswiki/Attrs.pm (modified) (5 diffs)

trunk/core/lib/Foswiki/Attrs.pm

@@ -55 +55 @@
 our $DEFAULTKEY = '_DEFAULT';
 our $RAWKEY     = '_RAW';
+our $MARKER     = "\0";
 
 =begin TML
@@ -78 +79 @@
     return $this unless defined($string);
 
-    $string =~ s/\\(["'])/$Foswiki::TranslationToken.sprintf("%.2u", ord($1))/ge
+    $string =~ s/\\(["'])/$MARKER.sprintf("%.2u", ord($1))/ge
       ;    # escapes
 
@@ -145 +146 @@
     }
     foreach my $k ( keys %$this ) {
-        $this->{$k} =~ s/$Foswiki::TranslationToken(\d\d)/chr($1)/geo; # escapes
+        $this->{$k} =~ s/$MARKER(\d\d)/chr($1)/geo; # escapes
     }
     return $this;
@@ -225 +226 @@
     my $value = '';
     return $value unless ($str);
-    $str =~ s/\\\"/\\$Foswiki::TranslationToken/g;    # escape \"
+    $str =~ s/\\\"/\\$MARKER/g;    # escape \"
 
     if ($name) {
@@ -260 +261 @@
         }
     }
-    $value =~ s/\\$Foswiki::TranslationToken/\"/go;    # resolve \"
+    $value =~ s/\\$MARKER/\"/go;    # resolve \"
     return $value;
 }