OsPath build fix

diff --git a/Annex/Notification.hs b/Annex/Notification.hs
index f2057973592e23be8476600e5493103cf6cd6789..82779b1f2d455e9a4c2cbd7a60c8a636631ba2a9 100644 (file)
--- a/Annex/Notification.hs
+++ b/Annex/Notification.hs
@@ -60,7 +60,7 @@ notifyDrop (AssociatedFile (Just f)) ok = do
        wanted <- Annex.getRead Annex.desktopnotify
        when (notifyFinish wanted) $ liftIO $ do
                client <- DBus.Client.connectSession
-               void $ Notify.notify client (droppedNote ok (fromRawFilePath f))
+               void $ Notify.notify client (droppedNote ok (fromOsPath f))
 #else
 notifyDrop (AssociatedFile (Just _)) _ = noop
 #endif