Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
clean-ide
Commits
11c4e298
Commit
11c4e298
authored
Jan 21, 2009
by
John van Groningen
Browse files
add update_type_window function
parent
aab0e82e
Changes
2
Hide whitespace changes
Inline
Side-by-side
Ide/typeatt.dcl
View file @
11c4e298
...
...
@@ -7,5 +7,7 @@ import StdPSt
from
EdMonad
import
::
EditState
from
IdeState
import
::
General
update_type_window
::
!
Bool
!
String
![
String
]
!*(
PSt
*
General
)
->
*
PSt
*
General
typeWinKeyboard
::
.
WindowAttribute
*(
EditState
,*
PSt
*
General
);
typeWinMouse
::
.
WindowAttribute
*(
EditState
,*
PSt
*
General
);
Ide/typeatt.icl
View file @
11c4e298
...
...
@@ -5,6 +5,11 @@ import IdeState
import
EdKeyboard
,
EdMouse
//--
update_type_window
::
!
Bool
!
String
![
String
]
!*(
PSt
*
General
)
->
*
PSt
*
General
update_type_window
interact
name
message
ps
#
atts
=
[
typeWinKeyboard
,
typeWinMouse
]
=
updateTypeWindow
interact
name
atts
message
ps
// fun to update type info in type window, text :: !Text
typeWinKeyboard
::
.
WindowAttribute
*(
EditState
,*
PSt
*
General
);
typeWinKeyboard
=
WindowKeyboard
(\_
->
True
)
Able
typeKeyboard
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment