# HG changeset patch
# User Adam Chlipala <adam@chlipala.net>
# Date 1445198636 14400
# Node ID 74c7620023522503dd38dc2b9fc62d29a298db4c
# Parent  d25c42e5d8f450ca33bd35552d26996811111f56
Allow duplicate 'file' directives if paths normalize to same value

diff -r d25c42e5d8f4 -r 74c762002352 src/settings.sml
--- a/src/settings.sml	Sun Oct 18 14:46:50 2015 -0400
+++ b/src/settings.sml	Sun Oct 18 16:03:56 2015 -0400
@@ -880,7 +880,7 @@
     in
         case SM.find (!files, Uri) of
             SOME (path', _) =>
-            if path' = path then
+            if OS.Path.mkCanonical path' = OS.Path.mkCanonical path then
                 ()
             else
                 ErrorMsg.error ("Two different files requested for URI " ^ Uri ^ " ( " ^ path' ^ " vs. " ^ path ^ ")")