[Fencommits] fenfire-hs: oops, make new urn-5's have a _ before the running number again, so that they can be used as properties in RDF/XML

[Benja Fallenstein]

Sun Feb 18 12:35:39 EET 2007  Benja Fallenstein <benja.fallenstein at gmail.com>
  * oops, make new urn-5's have a _ before the running number again, so that they can be used as properties in RDF/XML
diff -rN -u old-fenfire-hs/Fenfire.fhs new-fenfire-hs/Fenfire.fhs
--- old-fenfire-hs/Fenfire.fhs	2007-02-18 12:35:52.000000000 +0200
+++ new-fenfire-hs/Fenfire.fhs	2007-02-18 12:35:52.000000000 +0200
@@ -293,7 +293,7 @@
 newURI :: (?uriMaker :: URIMaker) => IO Node
 newURI = do let (base, ref) = ?uriMaker
             i <- readIORef ref; writeIORef ref (i+1)
-            return $ URI (base ++ ":" ++ show i)
+            return $ URI (base ++ ":_" ++ show i)
 
 newNode :: (?vs :: ViewSettings, ?uriMaker :: URIMaker) => 
            Rotation -> Dir -> Node -> IO Rotation