Added the tests in

Author: peterc

Rakefile

@@ -1,2 +1,11 @@
 require 'bundler'
 Bundler::GemHelper.install_tasks
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+task :default => :test

test/oldstyle.webloc

@@ -0,0 +1,8 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+	<key>URL</key>
+	<string>https://github.com/peterc/webloc</string>
+</dict>
+</plist>

test/pliststyle.webloc

@@ -0,0 +1,26 @@
+require 'test/unit'
+require 'webloc'
+
+class WeblocTest < Test::Unit::TestCase
+  def test_webloc_object_requires_url
+    assert_raise(ArgumentError) { Webloc.new }
+  end
+  
+  def test_webloc_object_created_with_url
+    assert_equal 'http://example.com', Webloc.new('http://example.com').url
+  end
+  
+  def test_webloc_object_loaded_from_old_style_file
+    assert_equal 'https://github.com/peterc/webloc', Webloc.load(File.dirname(__FILE__) + '/oldstyle.webloc').url
+  end
+
+  def test_webloc_object_loaded_from_plist_file
+    assert_equal 'https://github.com/peterc/webloc', Webloc.load(File.dirname(__FILE__) + '/pliststyle.webloc').url
+  end
+  
+  def test_webloc_generates_valid_data
+    data = File.read(File.dirname(__FILE__) + '/oldstyle.webloc')
+    data = data.force_encoding('binary') rescue data
+    assert_equal data, Webloc.new('https://github.com/peterc/webloc').data
+  end
+end