unisonweb/unison
1
0
Fork 0
mirror of https://github.com/unisonweb/unison.git synced 2024-11-10 20:00:27 +03:00
Code Issues Projects Releases Wiki Activity

Name: make "." parse as a relative ".", rather than a bogus empty absolute name

Browse Source
This commit is contained in:
Mitchell Rosen 2021-10-13 11:58:14 -04:00
parent 4d72bcc206
commit 5caef015b2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
unison-core/src/Unison/Name.hs
View File

@ -361,7 +361,7 @@ unsafeFromString =
unsafeFromText :: Text -> Name
unsafeFromText = \case
"." -> error "empty absolute name"
"." -> Name Relative ("." :| [])
".." -> Name Absolute ("." :| [])
t | Text.any (== '#') t -> error ("not a name: " <> show t)
t ->