gtk/gtk-widget: typo
authorMatt Birkholz <matt@birchwood-abbey.net>
Thu, 15 Mar 2018 15:23:45 +0000 (08:23 -0700)
committerMatt Birkholz <matt@birchwood-abbey.net>
Thu, 15 Mar 2018 15:23:45 +0000 (08:23 -0700)
src/gtk/gtk-widget.scm

index 237d1b1e76e0a36d2ba3359372b4f289d6fef98e..6fcd924d48c17c9c3b10cec0fa02c880e12da56d 100644 (file)
@@ -36,7 +36,7 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
 (define (set-gtk-adjustment! adjustment value
                             lower upper page-size
                             step-incr page-incr)
-  (assert-glib-locked set-gtk-adjustment!)
+  (assert-glib-locked 'set-gtk-adjustment!)
   (guarantee-live-gtk-adjustment adjustment 'set-gtk-adjustment!)
   (guarantee real? lower 'set-gtk-adjustment!)
   (guarantee real? upper 'set-gtk-adjustment!)