1 files changed, 42 insertions, 0 deletions
diff --git a/spec/ruby/core/file/lchmod_spec.rb b/spec/ruby/core/file/lchmod_spec.rb
new file mode 100644
index 0000000000..2ce265841e
--- /dev/null
+++ b/spec/ruby/core/file/lchmod_spec.rb
@@ -0,0 +1,42 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+
+describe "File.lchmod" do
+  platform_is_not :linux, :windows, :openbsd, :solaris, :aix do
+    before :each do
+      @fname = tmp('file_chmod_test')
+      @lname = @fname + '.lnk'
+
+      touch(@fname) { |f| f.write "rubinius" }
+
+      rm_r @lname
+      File.symlink @fname, @lname
+    end
+
+    after :each do
+      rm_r @lname, @fname
+    end
+
+    it "changes the file mode of the link and not of the file" do
+      File.chmod(0222, @lname).should == 1
+      File.lchmod(0755, @lname).should == 1
+
+      File.lstat(@lname).executable?.should == true
+      File.lstat(@lname).readable?.should == true
+      File.lstat(@lname).writable?.should == true
+
+      File.stat(@lname).executable?.should == false
+      File.stat(@lname).readable?.should == false
+      File.stat(@lname).writable?.should == true
+    end
+  end
+
+  platform_is :linux, :openbsd, :aix do
+    it "returns false from #respond_to?" do
+      File.respond_to?(:lchmod).should be_false
+    end
+
+    it "raises a NotImplementedError when called" do
+      lambda { File.lchmod 0 }.should raise_error(NotImplementedError)
+    end
+  end
+end