[perl-Gtk3] Fix partial misquoting in croak usage

[Torsten Schönfeld <tsch src gnome org>]

commit 3aced576c9d4e57a4d0c66163b4570ce52b60657
Author: Thierry Vignaud <thierry vignaud gmail com>
Date:   Thu Sep 5 09:13:45 2013 +0200

    Fix partial misquoting in croak usage
    
    Thus fixing parsing with perl_checker.
    
    Maybe it would be better to use qq() here ...

 lib/Gtk3.pm |   12 ++++++------
 1 files changed, 6 insertions(+), 6 deletions(-)
---
diff --git a/lib/Gtk3.pm b/lib/Gtk3.pm
index d8562da..5285cf9 100644
--- a/lib/Gtk3.pm
+++ b/lib/Gtk3.pm
@@ -1292,8 +1292,8 @@ sub Gtk3::Gdk::Pixbuf::save {
   my ($pixbuf, $filename, $type, @rest) = @_;
   my ($keys, $values) = _unpack_keys_and_values (\ rest);
   if (not defined $keys) {
-    croak ("Usage: $pixbuf->save (\$filename, \$type, \\\ keys, \\\ values)\n",
-           " -or-: $pixbuf->save (\$filename, \$type, \$key1 => \$value1, ...)");
+    croak ("Usage: \$pixbuf->save (\$filename, \$type, \\\ keys, \\\ values)\n",
+           " -or-: \$pixbuf->save (\$filename, \$type, \$key1 => \$value1, ...)");
   }
   Glib::Object::Introspection->invoke (
     $_GDK_PIXBUF_BASENAME, 'Pixbuf', 'savev',
@@ -1304,8 +1304,8 @@ sub Gtk3::Gdk::Pixbuf::save_to_buffer {
   my ($pixbuf, $type, @rest) = @_;
   my ($keys, $values) = _unpack_keys_and_values (\ rest);
   if (not defined $keys) {
-    croak ("Usage: $pixbuf->save_to_buffer (\$type, \\\ keys, \\\ values)\n",
-           " -or-: $pixbuf->save_to_buffer (\$type, \$key1 => \$value1, ...)");
+    croak ("Usage: \$pixbuf->save_to_buffer (\$type, \\\ keys, \\\ values)\n",
+           " -or-: \$pixbuf->save_to_buffer (\$type, \$key1 => \$value1, ...)");
   }
   my (undef, $buffer) =
     Glib::Object::Introspection->invoke (
@@ -1318,8 +1318,8 @@ sub Gtk3::Gdk::Pixbuf::save_to_callback {
   my ($pixbuf, $save_func, $user_data, $type, @rest) = @_;
   my ($keys, $values) = _unpack_keys_and_values (\ rest);
   if (not defined $keys) {
-    croak ("Usage: $pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \\\ keys, \\\ values)\n",
-           " -or-: $pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \$key1 => \$value1, ...)");
+    croak ("Usage: \$pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \\\ keys, \\\ values)\n",
+           " -or-: \$pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \$key1 => \$value1, ...)");
   }
   Glib::Object::Introspection->invoke (
     $_GDK_PIXBUF_BASENAME, 'Pixbuf', 'save_to_callbackv',