Skip to content

Commit

Permalink
Merge 11d3a83 into 9855fff
Browse files Browse the repository at this point in the history
  • Loading branch information
rschwanhold committed May 29, 2018
2 parents 9855fff + 11d3a83 commit a44938c
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 6 deletions.
Original file line number Diff line number Diff line change
@@ -1,9 +1,7 @@
as yet unclassified
testMenuWithSpellingAtTop
| menu spellChecker selection topSuggestion |
| menu |
menu := pluggableTextMorphPlus getMenuWithSpellcheckingAtTop: (MenuMorph new defaultTarget: pluggableTextMorphPlus model).
selection := pluggableTextMorphPlus textMorph editor selection string.
spellChecker := SpellChecker new.
topSuggestion := (spellChecker suggestionsFor: selection) first.
self assert: ((menu items collect: [:item | item contents]) includes: topSuggestion).
"We used the workspace to find out that a suggestion for the selected word is 'test'"
self assert: ((menu items collect: [:item | item contents]) includes: 'test').
self assert: ((menu items collect: [:item | item contents]) includes: 'add to dictionary').
Original file line number Diff line number Diff line change
Expand Up @@ -3,4 +3,4 @@
},
"instance" : {
"setUp" : "RS 5/27/2018 16:00:29",
"testMenuWithSpellingAtTop" : "RS 5/27/2018 16:51:49" } }
"testMenuWithSpellingAtTop" : "RS 5/29/2018 11:30:09" } }

0 comments on commit a44938c

Please sign in to comment.