* lily/tweak-registration.cc (replace_grob_tweak): New function.

* lily/tweak-registration-scheme.cc (LY_DEFINE): Wrap it.
* scm/framework-gnome.scm (tweak): Use it.

diff --git a/scm/framework-gnome.scm b/scm/framework-gnome.scm
index b72e1f94a5c0055a9bb42dbf5916feb004bb9c5b..2eb9eae400f949acd15cdb560fa4a7e5022bddc0 100644 (file)
--- a/scm/framework-gnome.scm
+++ b/scm/framework-gnome.scm
@@ -380,9 +380,9 @@
                    (eq? keyval gdk:w))
                (equal? mods '(control-mask modifier-mask)))
           (gtk-main-quit))
-         (and (eq? keyval gdk:s)
-              (equal? mods '(control-mask modifier-mask))
-              (save-tweaks go))
+         ((and (eq? keyval gdk:s)
+               (equal? mods '(control-mask modifier-mask)))
+               (save-tweaks go))
          ((and #t ;;(null? mods)
                (eq? keyval gdk:plus))
           (scale-canvas go 2))