# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1483640000 0
# Node ID 4f469e17e70c64fa63cdf991b66bf5ba764f89b0
# Parent  e8402b50111c26ca9a70f41fb61be68d3e6e77df
Cleanup

diff -r e8402b50111c -r 4f469e17e70c src/debugger.lisp
--- a/src/debugger.lisp	Mon Jan 02 15:10:08 2017 +0000
+++ b/src/debugger.lisp	Thu Jan 05 18:13:20 2017 +0000
@@ -119,7 +119,7 @@
     (setf paused nil awaiting-arrival nil)))
 
 (defun debugger-toggle-pause (debugger)
-  (if (debugger-paused debugger)
+  (if (debugger-paused-p debugger)
     (debugger-unpause debugger)
     (debugger-pause debugger)))