diff options
Diffstat (limited to 'book/examples/chapter6/ClassesEng.gf')
| -rw-r--r-- | book/examples/chapter6/ClassesEng.gf | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/book/examples/chapter6/ClassesEng.gf b/book/examples/chapter6/ClassesEng.gf index a282bd87a..5bdf80c35 100644 --- a/book/examples/chapter6/ClassesEng.gf +++ b/book/examples/chapter6/ClassesEng.gf @@ -18,8 +18,8 @@ lin Fan = mkCN (mkN "fan") ; Switchable, Dimmable = <> ; - SwitchOn = mkV2 (mkV "on" (mkV "switch")) ; - SwitchOff = mkV2 (mkV "off" (mkV "switch")) ; + SwitchOn = mkV2 (partV (mkV "switch") "on") ; + SwitchOff = mkV2 (partV (mkV "switch") "off") ; Dim = mkV2 (mkV "dim") ; switchable_Light = <> ; |