RawFilePath optimisation
This commit is contained in:
parent
95a04920cf
commit
224a57f9ed
1 changed files with 1 additions and 1 deletions
|
@ -147,7 +147,7 @@ stagePointerFile file mode sha =
|
|||
writePointerFile :: RawFilePath -> Key -> Maybe FileMode -> IO ()
|
||||
writePointerFile file k mode = do
|
||||
S.writeFile (fromRawFilePath file) (formatPointer k)
|
||||
maybe noop (setFileMode $ fromRawFilePath file) mode
|
||||
maybe noop (R.setFileMode file) mode
|
||||
|
||||
newtype Restage = Restage Bool
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue