Permalink
Browse files

Oops, bareword exit doesn't work in NQP

  • Loading branch information...
sorear committed Apr 25, 2010
1 parent c264437 commit 4b3feea1c76a0cd3471b5ef5ebce3c399d782a60
Showing with 1 addition and 1 deletion.
  1. +1 −1 examples/tk.pl
View
@@ -19,7 +19,7 @@
# NQP doesn't support named args starting with a dash
$mw.Button(
'-text', 'Quit',
- '-command', sub (*@_) { exit },
+ '-command', sub (*@_) { pir::exit(0) },
).pack;
&MainLoop();

0 comments on commit 4b3feea

Please sign in to comment.