[gimp] Only TinyScheme should translate strings in script files. Fixes bug #696790.

[Kevin Cozens <kcozens src gnome org>]

commit c9533681649b8e1ce285e604ada4884b8d3bba83
Author: Kevin Cozens <kevin ve3syb ca>
Date:   Tue Apr 2 15:15:22 2013 -0400

    Only TinyScheme should translate strings in script files. Fixes bug #696790.

 plug-ins/script-fu/script-fu-interface.c |    6 +++---
 plug-ins/script-fu/script-fu-script.c    |    2 +-
 plug-ins/script-fu/script-fu-scripts.c   |   14 +++++++-------
 3 files changed, 11 insertions(+), 11 deletions(-)
---
diff --git a/plug-ins/script-fu/script-fu-interface.c b/plug-ins/script-fu/script-fu-interface.c
index b94571f..5bb40d7 100644
--- a/plug-ins/script-fu/script-fu-interface.c
+++ b/plug-ins/script-fu/script-fu-interface.c
@@ -287,7 +287,7 @@ script_fu_interface (SFScript  *script,
       /*  we add a colon after the label;
        *  some languages want an extra space here
        */
-      label_text = g_strdup_printf (_("%s:"), gettext (arg->label));
+      label_text = g_strdup_printf (_("%s:"), arg->label);
 
       switch (arg->type)
         {
@@ -350,7 +350,7 @@ script_fu_interface (SFScript  *script,
         case SF_TOGGLE:
           g_free (label_text);
           label_text = NULL;
-          widget = gtk_check_button_new_with_mnemonic (gettext (arg->label));
+          widget = gtk_check_button_new_with_mnemonic (arg->label);
           gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (widget),
                                         arg->value.sfa_toggle);
 
@@ -511,7 +511,7 @@ script_fu_interface (SFScript  *script,
                list = g_slist_next (list))
             {
               gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (widget),
-                                              gettext (list->data));
+                                              list->data);
             }
 
           gtk_combo_box_set_active (GTK_COMBO_BOX (widget),
diff --git a/plug-ins/script-fu/script-fu-script.c b/plug-ins/script-fu/script-fu-script.c
index 133a032..f540bb9 100644
--- a/plug-ins/script-fu/script-fu-script.c
+++ b/plug-ins/script-fu/script-fu-script.c
@@ -334,7 +334,7 @@ script_fu_script_get_title (SFScript *script)
   g_return_val_if_fail (script != NULL, NULL);
 
   /* strip mnemonics from the menupath */
-  title = gimp_strip_uline (gettext (script->menu_label));
+  title = gimp_strip_uline (script->menu_label);
 
   /* if this looks like a full menu path, use only the last part */
   if (title[0] == '<' && (tmp = strrchr (title, '/')) && tmp[1])
diff --git a/plug-ins/script-fu/script-fu-scripts.c b/plug-ins/script-fu/script-fu-scripts.c
index c8d9b07..1606ec5 100644
--- a/plug-ins/script-fu/script-fu-scripts.c
+++ b/plug-ins/script-fu/script-fu-scripts.c
@@ -506,10 +506,10 @@ script_fu_add_script (scheme  *sc,
     }
 
   {
-    const gchar *key  = gettext (script->menu_label);
-    GList       *list = g_tree_lookup (script_tree, key);
+    GList *list = g_tree_lookup (script_tree, script->menu_label);
 
-    g_tree_insert (script_tree, (gpointer) key, g_list_append (list, script));
+    g_tree_insert (script_tree, (gpointer) script->menu_label,
+                    g_list_append (list, script));
   }
 
   return sc->NIL;
@@ -876,14 +876,14 @@ script_fu_menu_compare (gconstpointer a,
 
   if (menu_a->menu_path && menu_b->menu_path)
     {
-      retval = g_utf8_collate (gettext (menu_a->menu_path),
-                               gettext (menu_b->menu_path));
+      retval = g_utf8_collate (menu_a->menu_path,
+                               menu_b->menu_path);
 
       if (retval == 0 &&
           menu_a->script->menu_label && menu_b->script->menu_label)
         {
-          retval = g_utf8_collate (gettext (menu_a->script->menu_label),
-                                   gettext (menu_b->script->menu_label));
+          retval = g_utf8_collate (menu_a->script->menu_label,
+                                   menu_b->script->menu_label);
         }
     }