We planned to upgrade GitLab and Mattermost to the latest version this Friday morning (early). You may experience some downtime!

Commit a58ff24c authored by Diederik van Arkel's avatar Diederik van Arkel

get/setModified dummy windows implementation

parent 120d6838
definition module Platform definition module Platform
import StdPSt, StdString import StdPSt, StdString
import StdIOCommon
PlatformDependant win mac :== win PlatformDependant win mac :== win
...@@ -8,6 +9,9 @@ initPlatformCommandLine :: !*(PSt .l) -> (![String],!*PSt .l) ...@@ -8,6 +9,9 @@ initPlatformCommandLine :: !*(PSt .l) -> (![String],!*PSt .l)
installPlatformEventHandlers :: !*(PSt .l) -> *(PSt .l) installPlatformEventHandlers :: !*(PSt .l) -> *(PSt .l)
openPlatformWindowMenu :: !*(PSt .l) -> *(PSt .l) openPlatformWindowMenu :: !*(PSt .l) -> *(PSt .l)
getWindowModified :: !Id !(IOSt .l) -> (!Maybe Bool,!IOSt .l)
setWindowModified :: !Id !String !Bool !(IOSt .l) -> IOSt .l
ToolsDir :: String ToolsDir :: String
TempDir :: String TempDir :: String
EnvsDir :: String EnvsDir :: String
......
...@@ -7,6 +7,7 @@ import UtilIO ...@@ -7,6 +7,7 @@ import UtilIO
from StdSystem import dirseparator from StdSystem import dirseparator
import code from library "platform_kernel_library" import code from library "platform_kernel_library"
import clCCall_12, ostoolbox import clCCall_12, ostoolbox
import StdIOCommon
import logfile, set_return_code import logfile, set_return_code
PlatformDependant win mac :== win PlatformDependant win mac :== win
...@@ -89,6 +90,12 @@ openPlatformWindowMenu :: !*(PSt .l) -> *(PSt .l) ...@@ -89,6 +90,12 @@ openPlatformWindowMenu :: !*(PSt .l) -> *(PSt .l)
openPlatformWindowMenu ps openPlatformWindowMenu ps
= ps = ps
getWindowModified :: !Id !(IOSt .l) -> (!Maybe Bool,!IOSt .l)
getWindowModified _ io = (Nothing,io)
setWindowModified :: !Id !String !Bool !(IOSt .l) -> IOSt .l
setWindowModified _ _ _ io = io
//==== //====
inifilename inifilename
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment