diff options
Diffstat (limited to 'src/algebra/view2D.spad.pamphlet')
| -rw-r--r-- | src/algebra/view2D.spad.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/view2D.spad.pamphlet b/src/algebra/view2D.spad.pamphlet index 5a032a44..bdd63f5e 100644 --- a/src/algebra/view2D.spad.pamphlet +++ b/src/algebra/view2D.spad.pamphlet @@ -779,7 +779,7 @@ TwoDimensionalViewport ():Exports == Implementation where -- the viewports in its list. a -1 means it doesn't -- exist. sendI(VIEW,viewport.key)$Lisp - i := getI(VIEW)$Lisp + i: Integer := getI(VIEW)$Lisp negative? i => viewport.key := 0$I error "This viewport has already been closed!" |