more OsPath conversion (602/749)
Sponsored-by: Brock Spratlen
This commit is contained in:
parent
2d1db7986c
commit
a5d48edd94
25 changed files with 227 additions and 187 deletions
|
@ -62,14 +62,14 @@ addViewMetaData :: View -> ViewedFile -> Key -> CommandStart
|
|||
addViewMetaData v f k = starting "metadata" ai si $
|
||||
next $ changeMetaData k $ fromView v f
|
||||
where
|
||||
ai = mkActionItem (k, toRawFilePath f)
|
||||
ai = mkActionItem (k, f)
|
||||
si = SeekInput []
|
||||
|
||||
removeViewMetaData :: View -> ViewedFile -> Key -> CommandStart
|
||||
removeViewMetaData v f k = starting "metadata" ai si $
|
||||
next $ changeMetaData k $ unsetMetaData $ fromView v f
|
||||
where
|
||||
ai = mkActionItem (k, toRawFilePath f)
|
||||
ai = mkActionItem (k, f)
|
||||
si = SeekInput []
|
||||
|
||||
changeMetaData :: Key -> MetaData -> CommandCleanup
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue