fix runtime error on simple-viewer-set-key!

got an error when I called simple-viewer-set-key!
```
*** ERROR: object of class #<class <simple-viewer-window>> doesn't have such slot: key-handlers
```

Does this fix work?