[commit: haddock] master: Add qualified name test for identifiers hyperlinking test case. (8071c27)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/haddock

On branch  : master
Link       : http://git.haskell.org/haddock.git/commitdiff/8071c27826d60eec1cb20f00f9767c32366defac

>---------------------------------------------------------------

commit 8071c27826d60eec1cb20f00f9767c32366defac
Author: Łukasz Hanuszczak <lukasz.hanuszczak at gmail.com>
Date:   Wed Jul 1 22:27:38 2015 +0200

    Add qualified name test for identifiers hyperlinking test case.


>---------------------------------------------------------------

8071c27826d60eec1cb20f00f9767c32366defac
 hypsrc-test/ref/src/Identifiers.html | 45 ++++++++++++++++++++++++++++++++++++
 hypsrc-test/src/Identifiers.hs       |  1 +
 2 files changed, 46 insertions(+)

diff --git a/hypsrc-test/ref/src/Identifiers.html b/hypsrc-test/ref/src/Identifiers.html
index 4c82ad0..14cfbd8 100644
--- a/hypsrc-test/ref/src/Identifiers.html
+++ b/hypsrc-test/ref/src/Identifiers.html
@@ -737,6 +737,51 @@
 	></a
       ><span class=""
       >
+    </span
+      ><span class="hs-identifier hs-var"
+      >putStrLn</span
+      ><span class=""
+      > </span
+      ><span class="hs-operator hs-var"
+      >.</span
+      ><span class=""
+      > </span
+      ><span class="hs-identifier hs-var"
+      >show</span
+      ><span class=""
+      > </span
+      ><span class="hs-operator hs-var"
+      >$</span
+      ><span class=""
+      > </span
+      ><a href="Identifiers.html#norf"
+      ><span class="hs-identifier hs-var"
+	>Identifiers</span
+	><span class="hs-operator hs-var"
+	>.</span
+	><span class="hs-identifier hs-var"
+	>norf</span
+	></a
+      ><span class=""
+      > </span
+      ><a href="#local-0"
+      ><span class="hs-identifier hs-var"
+	>x</span
+	></a
+      ><span class=""
+      > </span
+      ><a href="#local-0"
+      ><span class="hs-identifier hs-var"
+	>y</span
+	></a
+      ><span class=""
+      > </span
+      ><a href="#local-0"
+      ><span class="hs-identifier hs-var"
+	>z</span
+	></a
+      ><span class=""
+      >
   </span
       ><span class="hs-keyword"
       >where</span
diff --git a/hypsrc-test/src/Identifiers.hs b/hypsrc-test/src/Identifiers.hs
index e2d6223..173c3ba 100644
--- a/hypsrc-test/src/Identifiers.hs
+++ b/hypsrc-test/src/Identifiers.hs
@@ -21,6 +21,7 @@ main :: IO ()
 main = do
     putStrLn . show $ foo x y
     putStrLn . show $ quux z
+    putStrLn . show $ Identifiers.norf x y z
   where
     x = 10
     y = 20