0.35

ingydotnet · Jun 15, 2014 · c0b1f1c · c0b1f1c
1 parent b90846b
commit c0b1f1c
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 8 deletions.
diff --git a/Changes b/Changes
@@ -1,4 +1,9 @@
 ---
+version: 0.35
+date:    Sun Jun 15 13:01:01 PDT 2014
+changes:
+- Add Chomp to Standard Library
+---
 version: 0.34
 date:    Sat Jun 14 12:53:08 PDT 2014
 changes:

diff --git a/Meta b/Meta
@@ -1,7 +1,7 @@
 =meta: 0.0.1
 
 name: TestML
-version: 0.34
+version: 0.35
 abstract: A Generic Software Testing Meta Language
 homepage: http://testml.org
 

diff --git a/lib/TestML/Library/Standard.pm b/lib/TestML/Library/Standard.pm
@@ -112,14 +112,14 @@ sub Print {
     return bool(1);
 }
 
-1;
+sub Chomp {
+    my ($self, $string) = @_;
+    my $value = $string->str->value;
+    chomp($value);
+    return str $value;
+}
 
-# sub Chomp {
-#     my ($self, $string) = @_;
-#     my $value = $string->str->value;
-#     chomp($value);
-#     return $value;
-# }
+1;
 
 # sub Has {
 #     my ($self, $string, $part) = @_;