Treat linking to Markdown label correctly

lib/rdoc/markup/to_html_crossref.rb

@@ -153,7 +153,11 @@ class RDoc::Markup::ToHtmlCrossref < RDoc::Markup::ToHtml
             ref.sections.any? { |section| label == section.title } then
         path << "##{label}"
       else
-        path << "##{ref.aref}-label-#{label}"
+        if ref.respond_to?(:aref)
+          path << "##{ref.aref}-label-#{label}"
+        else
+          path << "#label-#{label}"
+        end
       end if label
 
       "<a href=\"#{path}\">#{text}</a>"

test/rdoc/test_rdoc_markup_to_html_crossref.rb

@@ -26,6 +26,11 @@ class TestRDocMarkupToHtmlCrossref < XrefTestCase
                  result
   end
 
+  def test_convert_CROSSREF_label_for_md
+    result = @to.convert 'EXAMPLE@foo'
+    assert_equal para("<a href=\"EXAMPLE_md.html#label-foo\">foo at <code>EXAMPLE</code></a>"), result
+  end
+
   def test_convert_CROSSREF_label_period
     result = @to.convert 'C1@foo.'
     assert_equal para("<a href=\"C1.html#class-C1-label-foo\">foo at <code>C1</code></a>."), result

test/rdoc/test_rdoc_store.rb

@@ -172,7 +172,7 @@ class TestRDocStore < XrefTestCase
   end
 
   def test_all_files
-    assert_equal %w[xref_data.rb],
+    assert_equal %w[EXAMPLE.md xref_data.rb],
                  @store.all_files.map { |m| m.full_name }.sort
   end
 

test/rdoc/xref_test_case.rb

@@ -22,8 +22,13 @@ class XrefTestCase < RDoc::TestCase
 
     parser = RDoc::Parser::Ruby.new @xref_data, @file_name, XREF_DATA, @options,
                                     stats
+
+    @example_md = @store.add_file 'EXAMPLE.md'
+    @example_md.parser = RDoc::Parser::Markdown
+
     @top_levels = []
     @top_levels.push parser.scan
+    @top_levels.push @example_md
 
     generator = Object.new
     def generator.class_dir() nil end