X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=3rdparty%2Fmodules%2Fstdlib%2Fspec%2Facceptance%2Fis_string_spec.rb;h=e3ab31a440c711d541c27decf9760d6e156ab322;hb=6f656bd4265e3dab13b9af2bf96e9044322e9d8f;hp=94d8e96783019e76264a78297abff03ddbb742fa;hpb=ad88f67c13ae0f1a08936dad643f1e3509ab5f40;p=mirror%2Fdsa-puppet.git

diff --git a/3rdparty/modules/stdlib/spec/acceptance/is_string_spec.rb b/3rdparty/modules/stdlib/spec/acceptance/is_string_spec.rb
old mode 100755
new mode 100644
index 94d8e9678..e3ab31a44
--- a/3rdparty/modules/stdlib/spec/acceptance/is_string_spec.rb
+++ b/3rdparty/modules/stdlib/spec/acceptance/is_string_spec.rb
@@ -1,98 +1,107 @@
-#! /usr/bin/env ruby -S rspec
 require 'spec_helper_acceptance'
 
-describe 'is_string function', :unless => UNSUPPORTED_PLATFORMS.include?(fact('operatingsystem')) do
+describe 'is_string function' do
   describe 'success' do
-    it 'is_strings arrays' do
-      pp = <<-EOS
+    pp1 = <<-DOC
       $a = ['aaa.com','bbb','ccc']
       $b = false
       $o = is_string($a)
       if $o == $b {
         notify { 'output correct': }
       }
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/Notice: output correct/)
+    DOC
+    it 'is_strings arrays' do
+      apply_manifest(pp1, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{Notice: output correct})
       end
     end
-    it 'is_strings true' do
-      pp = <<-EOS
+
+    pp2 = <<-DOC
       $a = true
       $b = false
       $o = is_string($a)
       if $o == $b {
         notify { 'output correct': }
       }
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/Notice: output correct/)
+    DOC
+    it 'is_strings true' do
+      apply_manifest(pp2, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{Notice: output correct})
       end
     end
-    it 'is_strings strings' do
-      pp = <<-EOS
+
+    pp3 = <<-DOC
       $a = "aoeu"
       $o = is_string($a)
       notice(inline_template('is_string is <%= @o.inspect %>'))
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/is_string is true/)
+    DOC
+    it 'is_strings strings' do
+      apply_manifest(pp3, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{is_string is true})
       end
     end
-    it 'is_strings number strings' do
-      pp = <<-EOS
+
+    pp4 = <<-DOC
       $a = "3"
       $o = is_string($a)
       notice(inline_template('is_string is <%= @o.inspect %>'))
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/is_string is false/)
+    DOC
+    it 'is_strings number strings' do
+      apply_manifest(pp4, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{is_string is false})
       end
     end
-    it 'is_strings floats' do
-      pp = <<-EOS
+
+    pp5 = <<-DOC
       $a = 3.5
       $b = false
       $o = is_string($a)
       if $o == $b {
         notify { 'output correct': }
       }
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/Notice: output correct/)
+    DOC
+    it 'is_strings floats' do
+      apply_manifest(pp5, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{Notice: output correct})
       end
     end
-    it 'is_strings integers' do
-      pp = <<-EOS
+
+    pp6 = <<-DOC
       $a = 3
       $b = false
       $o = is_string($a)
       if $o == $b {
         notify { 'output correct': }
       }
-      EOS
-
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/Notice: output correct/)
+    DOC
+    it 'is_strings integers' do
+      apply_manifest(pp6, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{Notice: output correct})
       end
     end
-    it 'is_strings hashes' do
-      pp = <<-EOS
+
+    pp7 = <<-DOC
       $a = {'aaa'=>'www.com'}
       $b = false
       $o = is_string($a)
       if $o == $b {
         notify { 'output correct': }
       }
-      EOS
+    DOC
+    it 'is_strings hashes' do
+      apply_manifest(pp7, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{Notice: output correct})
+      end
+    end
 
-      apply_manifest(pp, :catch_failures => true) do |r|
-        expect(r.stdout).to match(/Notice: output correct/)
+    pp8 = <<-DOC
+      $a = undef
+      $o = is_string($a)
+      notice(inline_template('is_string is <%= @o.inspect %>'))
+    DOC
+    it 'is_strings undef' do
+      apply_manifest(pp8, :catch_failures => true) do |r|
+        expect(r.stdout).to match(%r{is_string is true})
       end
     end
   end