prawn-git 2.0.1

data/spec/jpg_spec.rb

@@ -0,0 +1,25 @@
+# encoding: utf-8
+
+# Spec'ing the PNG class. Not complete yet - still needs to check the
+# contents of palette and transparency to ensure they're correct.
+# Need to find files that have these sections first.
+
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")
+
+describe "When reading a JPEG file" do
+
+  before(:each) do
+    @filename = "#{Prawn::DATADIR}/images/pigs.jpg"
+    @img_data = File.open(@filename, "rb") { |f| f.read }
+  end
+
+  it "should read the basic attributes correctly" do
+    jpg = Prawn::Images::JPG.new(@img_data)
+
+    jpg.width.should == 604
+    jpg.height.should == 453
+    jpg.bits.should == 8
+    jpg.channels.should == 3
+  end
+end
+

data/spec/line_wrap_spec.rb

@@ -0,0 +1,367 @@
+# encoding: utf-8
+
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")
+
+describe "Core::Text::Formatted::LineWrap#wrap_line" do
+  before(:each) do
+    create_pdf
+    @arranger = Prawn::Text::Formatted::Arranger.new(@pdf)
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+    @one_word_width = 50
+  end
+  it "should strip leading and trailing spaces" do
+    array = [{ :text => " hello world, " },
+             { :text => "goodbye  ", :style => [:bold] }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                 :width => 300,
+                                 :document => @pdf)
+    string.should == "hello world, goodbye"
+  end
+  it "should strip trailing spaces when a white-space-only fragment was" +
+     " successfully pushed onto the end of a line but no other non-white" +
+     " space fragment fits after it" do
+    array = [{ :text => "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa " },
+             { :text => "  ", :style => [:bold] },
+             { :text => " bbbbbbbbbbbbbbbbbbbbbbbbbbbb" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                 :width => 300,
+                                 :document => @pdf)
+    string.should == "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
+  end
+  it "should raise_error CannotFit if a too-small width is given" do
+    array = [{ :text => " hello world, " },
+             { :text => "goodbye  ", :style => [:bold] }]
+    @arranger.format_array = array
+    lambda do
+      @line_wrap.wrap_line(:arranger => @arranger,
+                           :width => 1,
+                           :document => @pdf)
+    end.should raise_error(Prawn::Errors::CannotFit)
+  end
+
+  it "should break on space" do
+    array = [{ :text => "hello world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello"
+  end
+
+  it "should break on zero-width space" do
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    array = [{ :text => "hello#{Prawn::Text::ZWSP}world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello"
+  end
+
+  it "should not display zero-width space" do
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    array = [{ :text => "hello#{Prawn::Text::ZWSP}world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => 300,
+                                  :document => @pdf)
+    string.should == "helloworld"
+  end
+
+  it "should break on tab" do
+    array = [{ :text => "hello\tworld" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello"
+  end
+
+  it "should break on hyphens" do
+    array = [{ :text => "hello-world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello-"
+  end
+
+  it "should not break after a hyphen that follows white space and" +
+     "precedes a word" do
+    array = [{ :text => "hello -" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello -"
+
+    array = [{ :text => "hello -world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello"
+  end
+
+  it "should break on a soft hyphen" do
+    string = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}world")
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    expected = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}")
+    expected.force_encoding(Encoding::UTF_8)
+    string.should == expected
+
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+
+    string = "hello#{Prawn::Text::SHY}world"
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello#{Prawn::Text::SHY}"
+  end
+
+  it "should ignore width of a soft-hyphen during adding fragments to line", :issue =>775 do
+    hyphen_string = "Hy#{Prawn::Text::SHY}phe#{Prawn::Text::SHY}nat#{Prawn::Text::SHY}ions "
+    string1 = @pdf.font.normalize_encoding(hyphen_string * 5)
+    string2 = @pdf.font.normalize_encoding("Hyphenations " * 3 + hyphen_string)
+
+    array1 = [{text: string1}]
+    array2 = [{text: string2}]
+
+    @arranger.format_array = array1
+
+    res1 = @line_wrap.wrap_line(:arranger => @arranger,
+                                :width => 300,
+                                :document => @pdf)
+
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+
+    @arranger.format_array = array2
+
+    res2 = @line_wrap.wrap_line(:arranger => @arranger,
+                                :width => 300,
+                                :document => @pdf)
+    res1.should == res2
+  end
+
+  it "should not display soft hyphens except at the end of a line " +
+     "for more than one element in format_array", :issue => 347 do
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+
+    string1 = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}world ")
+    string2 = @pdf.font.normalize_encoding("hi#{Prawn::Text::SHY}earth")
+    array = [{ :text => string1 }, { :text => string2 }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => 300,
+                                  :document => @pdf)
+    string.should == "helloworld hiearth"
+  end
+
+  it "should not break before a hard hyphen that follows a word" do
+    enough_width_for_hello_world = 60
+
+    array = [{ :text => "hello world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => enough_width_for_hello_world,
+                                  :document => @pdf)
+    string.should == "hello world"
+
+    array = [{ :text => "hello world-" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => enough_width_for_hello_world,
+                                  :document => @pdf)
+    string.should == "hello"
+
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+    enough_width_for_hello_world = 68
+
+    array = [{ :text => "hello world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => enough_width_for_hello_world,
+                                  :document => @pdf)
+    string.should == "hello world"
+
+    array = [{ :text => "hello world-" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => enough_width_for_hello_world,
+                                  :document => @pdf)
+    string.should == "hello"
+  end
+
+  it "should not break after a hard hyphen that follows a soft hyphen and" +
+    "precedes a word" do
+    string = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}-")
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello-"
+
+    string = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}-world")
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    expected = @pdf.font.normalize_encoding("hello#{Prawn::Text::SHY}")
+    expected.force_encoding(Encoding::UTF_8)
+    string.should == expected
+
+    @pdf.font("#{Prawn::DATADIR}/fonts/DejaVuSans.ttf")
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+
+    string = "hello#{Prawn::Text::SHY}-"
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello-"
+
+    string = "hello#{Prawn::Text::SHY}-world"
+    array = [{ :text => string }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string.should == "hello#{Prawn::Text::SHY}"
+  end
+
+  it "should process UTF-8 chars", :unresolved, :issue => 693 do
+    array = [{ :text => "Ｔｅｓｔ" }]
+    @arranger.format_array = array
+
+    # Should not raise an encoding error
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => 300,
+                                  :document => @pdf)
+    string.should == "Ｔｅｓｔ"
+  end
+end
+
+describe "Core::Text::Formatted::LineWrap#space_count" do
+  before(:each) do
+    create_pdf
+    @arranger = Prawn::Text::Formatted::Arranger.new(@pdf)
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+  end
+  it "should return the number of spaces in the last wrapped line" do
+    array = [{ :text => "hello world, " },
+             { :text => "goodbye", :style => [:bold] }]
+    @arranger.format_array = array
+    @line_wrap.wrap_line(:arranger => @arranger,
+                        :width => 300,
+                        :document => @pdf)
+    @line_wrap.space_count.should == 2
+  end
+  it "should exclude preceding and trailing spaces from the count" do
+    array = [{ :text => " hello world, " },
+             { :text => "goodbye  ", :style => [:bold] }]
+    @arranger.format_array = array
+    @line_wrap.wrap_line(:arranger => @arranger,
+                        :width => 300,
+                        :document => @pdf)
+    @line_wrap.space_count.should == 2
+  end
+end
+
+describe "Core::Text::Formatted::LineWrap" do
+  before(:each) do
+    create_pdf
+    @arranger = Prawn::Text::Formatted::Arranger.new(@pdf)
+    array = [{ :text => "hello\nworld\n\n\nhow are you?" },
+             { :text => "\n" },
+             { :text => "\n" },
+             { :text => "" },
+             { :text => "fine, thanks. " * 4 },
+             { :text => "" },
+             { :text => "\n" },
+             { :text => "" }]
+    @arranger.format_array = array
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+  end
+  it "should only return an empty string if nothing fit or there" +
+     "was nothing to wrap" do
+    8.times do
+      line = @line_wrap.wrap_line(:arranger => @arranger,
+                                 :width => 200,
+                                 :document => @pdf)
+      line.should_not be_empty
+    end
+    line = @line_wrap.wrap_line(:arranger => @arranger,
+                               :width => 200,
+                               :document => @pdf)
+    line.should be_empty
+  end
+  it "should tokenize a string using the scan_pattern" do
+    tokens = @line_wrap.tokenize("one two three")
+    tokens.length.should == 6
+  end
+end
+
+describe "Core::Text::Formatted::LineWrap#paragraph_finished?" do
+  before(:each) do
+    create_pdf
+    @arranger = Prawn::Text::Formatted::Arranger.new(@pdf)
+    @line_wrap = Prawn::Text::Formatted::LineWrap.new
+    @one_word_width = 50
+  end
+  it "should be_false when the last printed line is not the end of the paragraph" do
+    array = [{ :text => "hello world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+
+    @line_wrap.paragraph_finished?.should == false
+  end
+  it "should be_true when the last printed line is the last fragment to print" do
+    array = [{ :text => "hello world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+
+    @line_wrap.paragraph_finished?.should == true
+  end
+  it "should be_true when a newline exists on the current line" do
+    array = [{ :text => "hello\n world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+
+    @line_wrap.paragraph_finished?.should == true
+  end
+  it "should be_true when a newline exists in the next fragment" do
+    array = [{ :text => "hello " },
+             { :text => " \n" },
+             { :text => "world" }]
+    @arranger.format_array = array
+    string = @line_wrap.wrap_line(:arranger => @arranger,
+                                  :width => @one_word_width,
+                                  :document => @pdf)
+
+    @line_wrap.paragraph_finished?.should == true
+  end
+end
+

data/spec/measurement_units_spec.rb

@@ -0,0 +1,25 @@
+# encoding: utf-8
+
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")
+require "prawn/measurement_extensions"
+
+describe "Measurement units" do
+
+  it "should convert units to PostScriptPoints" do
+    1.mm.should be_within(0.000000001).of(2.834645669)
+    1.mm.should == (72 / 25.4)
+    2.mm.should == (2 * 72 / 25.4)
+    3.mm.should == 3 * 72 / 25.4
+    -3.mm.should == -3 * 72/25.4
+    1.cm.should == 10 * 72 / 25.4
+    1.dm.should == 100 * 72 / 25.4
+    1.m.should == 1000 * 72 / 25.4
+
+    1.in.should == 72
+    1.ft.should == 72 * 12
+    1.yd.should == 72 * 12 * 3
+    1.pt.should == 1
+  end
+
+end
+

data/spec/outline_spec.rb

@@ -0,0 +1,430 @@
+# encoding: utf-8
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")
+
+describe "Outline" do
+  before(:each) do
+    @pdf = Prawn::Document.new() do
+      text "Page 1. This is the first Chapter. "
+      start_new_page
+      text "Page 2. More in the first Chapter. "
+      start_new_page
+      outline.define do
+        section 'Chapter 1', :destination => 1, :closed => true do
+          page :destination => 1, :title => 'Page 1'
+          page :destination => 2, :title => 'Page 2'
+        end
+      end
+    end
+  end
+
+  describe "outline encoding" do
+    it "should store all outline titles as UTF-16" do
+      render_and_find_objects
+      @hash.values.each do |obj|
+        if obj.is_a?(Hash) && obj[:Title]
+          title = obj[:Title].dup
+          title.force_encoding(Encoding::UTF_16LE)
+          title.valid_encoding?.should == true
+        end
+      end
+    end
+  end
+
+  describe "#generate_outline" do
+    before(:each) do
+      render_and_find_objects
+    end
+
+    it "should create a root outline dictionary item" do
+      @outline_root.should_not be_nil
+    end
+
+    it "should set the first and last top items of the root outline dictionary item" do
+      referenced_object(@outline_root[:First]).should == @section_1
+      referenced_object(@outline_root[:Last]).should == @section_1
+    end
+
+    describe "#create_outline_item" do
+      it "should create outline items for each section and page" do
+        [@section_1, @page_1, @page_2].each {|item| item.should_not be_nil}
+      end
+    end
+
+    describe "#set_relations, #set_variables_for_block, and #reset_parent" do
+      it "should link sibling items" do
+        referenced_object(@page_1[:Next]).should == @page_2
+        referenced_object(@page_2[:Prev]).should == @page_1
+      end
+
+      it "should link child items to parent item" do
+        [@page_1, @page_2].each {|page| referenced_object(page[:Parent]).should == @section_1 }
+      end
+
+      it "should set the first and last child items for parent item" do
+        referenced_object(@section_1[:First]).should == @page_1
+        referenced_object(@section_1[:Last]).should == @page_2
+      end
+    end
+
+    describe "#increase_count" do
+
+      it "should add the count of all descendant items" do
+        @outline_root[:Count].should == 3
+        @section_1[:Count].abs.should == 2
+        @page_1[:Count].should == 0
+        @page_2[:Count].should == 0
+      end
+
+    end
+
+    describe "closed option" do
+
+      it "should set the item's integer count to negative" do
+        @section_1[:Count].should == -2
+      end
+
+    end
+
+  end
+
+  describe "adding a custom destination" do
+    before(:each) do
+      @pdf.start_new_page
+      @pdf.text "Page 3 with a destination"
+      @pdf.add_dest('customdest', @pdf.dest_xyz(200, 200))
+      pdf = @pdf
+      @pdf.outline.update do
+        page :destination => pdf.dest_xyz(200, 200), :title => 'Custom Destination'
+      end
+      render_and_find_objects
+    end
+
+    it "should create an outline item" do
+      @custom_dest.should_not be_nil
+    end
+
+    it "should reference the custom destination" do
+      referenced_object(@custom_dest[:Dest].first).should == referenced_object(@pages.last)
+    end
+
+  end
+
+  describe "addding a section later with outline#section" do
+    before(:each) do
+      @pdf.start_new_page
+      @pdf.text "Page 3. An added section "
+      @pdf.outline.update do
+        section 'Added Section', :destination => 3 do
+          page :destination => 3, :title => 'Page 3'
+        end
+      end
+      render_and_find_objects
+    end
+
+    it "should add new outline items to document" do
+      [@section_2, @page_3].each { |item| item.should_not be_nil}
+    end
+
+    it "should reset the last items for root outline dictionary" do
+      referenced_object(@outline_root[:First]).should == @section_1
+      referenced_object(@outline_root[:Last]).should == @section_2
+    end
+
+    it "should reset the next relation for the previous last top level item" do
+      referenced_object(@section_1[:Next]).should == @section_2
+    end
+
+    it "should set the previous relation of the addded to section" do
+      referenced_object(@section_2[:Prev]).should == @section_1
+    end
+
+    it "should increase the count of root outline dictionary" do
+      @outline_root[:Count].should == 5
+    end
+
+  end
+
+  describe "#outline.add_subsection_to" do
+    context "positioned last" do
+
+      before(:each) do
+        @pdf.start_new_page
+        @pdf.text "Page 3. An added subsection "
+        @pdf.outline.update do
+          add_subsection_to 'Chapter 1' do
+            section 'Added SubSection', :destination => 3 do
+              page :destination => 3, :title => 'Added Page 3'
+            end
+          end
+        end
+        render_and_find_objects
+      end
+
+      it "should add new outline items to document" do
+        [@subsection, @added_page_3].each { |item| item.should_not be_nil}
+      end
+
+      it "should reset the last item for parent item dictionary" do
+        referenced_object(@section_1[:First]).should == @page_1
+        referenced_object(@section_1[:Last]).should == @subsection
+      end
+
+      it "should set the prev relation for the new subsection to its parent's old last item" do
+        referenced_object(@subsection[:Prev]).should == @page_2
+      end
+
+
+      it "the subsection should become the next relation for its parent's old last item" do
+         referenced_object(@page_2[:Next]).should == @subsection
+       end
+
+      it "should set the first relation for the new subsection" do
+        referenced_object(@subsection[:First]).should == @added_page_3
+      end
+
+      it "should set the correct last relation of the added to section" do
+        referenced_object(@subsection[:Last]).should == @added_page_3
+      end
+
+      it "should increase the count of root outline dictionary" do
+        @outline_root[:Count].should == 5
+      end
+
+    end
+
+    context "positioned first" do
+
+      before(:each) do
+        @pdf.start_new_page
+        @pdf.text "Page 3. An added subsection "
+        @pdf.outline.update do
+          add_subsection_to 'Chapter 1', :first do
+            section 'Added SubSection', :destination => 3 do
+              page :destination => 3, :title => 'Added Page 3'
+            end
+          end
+        end
+        render_and_find_objects
+      end
+
+      it "should add new outline items to document" do
+        [@subsection, @added_page_3].each { |item| item.should_not be_nil}
+      end
+
+      it "should reset the first item for parent item dictionary" do
+        referenced_object(@section_1[:First]).should == @subsection
+        referenced_object(@section_1[:Last]).should == @page_2
+      end
+
+      it "should set the next relation for the new subsection to its parent's old first item" do
+        referenced_object(@subsection[:Next]).should == @page_1
+      end
+
+      it "the subsection should become the prev relation for its parent's old first item" do
+         referenced_object(@page_1[:Prev]).should == @subsection
+       end
+
+      it "should set the first relation for the new subsection" do
+        referenced_object(@subsection[:First]).should == @added_page_3
+      end
+
+      it "should set the correct last relation of the added to section" do
+        referenced_object(@subsection[:Last]).should == @added_page_3
+      end
+
+      it "should increase the count of root outline dictionary" do
+        @outline_root[:Count].should == 5
+      end
+
+    end
+
+    it "should require an existing title" do
+      lambda do
+        @pdf.go_to_page 1
+        @pdf.start_new_page
+        @pdf.text "Inserted Page"
+        @pdf.outline.update do
+          add_subsection_to 'Wrong page' do
+            page page_number, :title => "Inserted Page"
+          end
+        end
+        render_and_find_objects
+      end.should raise_error(Prawn::Errors::UnknownOutlineTitle)
+    end
+  end
+
+  describe "#outline.insert_section_after" do
+    describe "inserting in the middle of another section" do
+      before(:each) do
+        @pdf.go_to_page 1
+        @pdf.start_new_page
+        @pdf.text "Inserted Page"
+        @pdf.outline.update do
+          insert_section_after 'Page 1' do
+            page :destination => page_number, :title => "Inserted Page"
+          end
+        end
+      end
+
+      it "should insert new outline items to document" do
+        render_and_find_objects
+        @inserted_page.should_not be_nil
+      end
+
+      it "should adjust the count of all ancestors" do
+        render_and_find_objects
+        @outline_root[:Count].should == 4
+        @section_1[:Count].abs.should == 3
+      end
+
+      describe "#adjust_relations" do
+
+        it "should reset the sibling relations of adjoining items to inserted item" do
+          render_and_find_objects
+          referenced_object(@page_1[:Next]).should == @inserted_page
+          referenced_object(@page_2[:Prev]).should == @inserted_page
+        end
+
+        it "should set the sibling relation of added item to adjoining items" do
+          render_and_find_objects
+          referenced_object(@inserted_page[:Next]).should == @page_2
+          referenced_object(@inserted_page[:Prev]).should == @page_1
+        end
+
+        it "should not affect the first and last relations of parent item" do
+          render_and_find_objects
+          referenced_object(@section_1[:First]).should == @page_1
+          referenced_object(@section_1[:Last]).should == @page_2
+        end
+
+      end
+
+
+      context "when adding another section afterwards" do
+        it "should have reset the root position so that a new section is added at the end of root sections" do
+          @pdf.start_new_page
+          @pdf.text "Another Inserted Page"
+          @pdf.outline.update do
+            section 'Added Section' do
+              page :destination => page_number, :title => "Inserted Page"
+            end
+          end
+          render_and_find_objects
+          referenced_object(@outline_root[:Last]).should == @section_2
+          referenced_object(@section_1[:Next]).should == @section_2
+        end
+      end
+
+   end
+
+
+    describe "inserting at the end of another section" do
+
+      before(:each) do
+        @pdf.go_to_page 2
+         @pdf.start_new_page
+         @pdf.text "Inserted Page"
+         @pdf.outline.update do
+           insert_section_after 'Page 2' do
+             page :destination => page_number, :title => "Inserted Page"
+           end
+         end
+         render_and_find_objects
+      end
+
+      describe "#adjust_relations" do
+
+        it "should reset the sibling relations of adjoining item to inserted item" do
+           referenced_object(@page_2[:Next]).should == @inserted_page
+        end
+
+        it "should set the sibling relation of added item to adjoining items" do
+          referenced_object(@inserted_page[:Next]).should be_nil
+          referenced_object(@inserted_page[:Prev]).should == @page_2
+        end
+
+        it "should adjust the last relation of parent item" do
+          referenced_object(@section_1[:Last]).should == @inserted_page
+        end
+
+      end
+    end
+
+    it "should require an existing title" do
+      lambda do
+        @pdf.go_to_page 1
+        @pdf.start_new_page
+        @pdf.text "Inserted Page"
+        @pdf.outline.update do
+          insert_section_after 'Wrong page' do
+            page :destination => page_number, :title => "Inserted Page"
+          end
+        end
+        render_and_find_objects
+      end.should raise_error(Prawn::Errors::UnknownOutlineTitle)
+    end
+
+  end
+
+  describe "#page" do
+    it "should require a title option to be set" do
+      lambda do
+        @pdf = Prawn::Document.new() do
+          text "Page 1. This is the first Chapter. "
+          outline.define do
+            page :destination => 1, :title => nil
+          end
+        end
+      end.should raise_error(Prawn::Errors::RequiredOption)
+    end
+  end
+end
+
+describe "foreign character encoding" do
+  before(:each) do
+    pdf = Prawn::Document.new() do
+      outline.define do
+        section 'La pomme croquée', :destination => 1, :closed => true
+      end
+    end
+    @hash = PDF::Reader::ObjectHash.new(StringIO.new(pdf.render, 'r+'))
+  end
+
+  it "should handle other encodings for the title" do
+    object = find_by_title('La pomme croquée')
+    object.should_not == nil
+  end
+end
+
+def render_and_find_objects
+  output = StringIO.new(@pdf.render, 'r+')
+  @hash = PDF::Reader::ObjectHash.new(output)
+  @outline_root = @hash.values.find {|obj| obj.is_a?(Hash) && obj[:Type] == :Outlines}
+  @pages = @hash.values.find {|obj| obj.is_a?(Hash) && obj[:Type] == :Pages}[:Kids]
+  @section_1 = find_by_title('Chapter 1')
+  @page_1 = find_by_title('Page 1')
+  @page_2 = find_by_title('Page 2')
+  @section_2 = find_by_title('Added Section')
+  @page_3 = find_by_title('Page 3')
+  @inserted_page = find_by_title('Inserted Page')
+  @subsection = find_by_title('Added SubSection')
+  @added_page_3 = find_by_title('Added Page 3')
+  @custom_dest = find_by_title('Custom Destination')
+end
+
+# Outline titles are stored as UTF-16. This method accepts a UTF-8 outline title
+# and returns the PDF Object that contains an outline with that name
+def find_by_title(title)
+  @hash.values.find {|obj|
+    if obj.is_a?(Hash) && obj[:Title]
+      title_codepoints = obj[:Title].unpack("n*")
+      title_codepoints.shift
+      utf8_title = title_codepoints.pack("U*")
+      utf8_title == title ? obj : nil
+    end
+  }
+end
+
+def referenced_object(reference)
+  @hash[reference]
+end