From 6fe6cfdc15f285c047fb5443129bbd6ae5c6dd60 Mon Sep 17 00:00:00 2001
From: Martin Baulig <martin@src.gnome.org>
Date: Tue, 8 Sep 1998 13:10:55 +0000
Subject: [PATCH] Bug fix.

---
 sysdeps/guile/guile.awk | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/sysdeps/guile/guile.awk b/sysdeps/guile/guile.awk
index c269607e..0a268f45 100644
--- a/sysdeps/guile/guile.awk
+++ b/sysdeps/guile/guile.awk
@@ -48,7 +48,7 @@ function make_output(line) {
       list = params[param];
       type = params[param];
       sub(/\(.*/, "", type);
-      sub(/^\w+\(/, "", list); sub(/\)$/, "", list);
+      sub(/^.*\(/, "", list); sub(/\)$/, "", list);
       count = split (list, fields, /,/);
       total_nr_params = total_nr_params + count;
       for (field = 1; field <= count; field++) {
@@ -87,7 +87,7 @@ function make_output(line) {
     list = elements[element];
     type = elements[element];
     sub(/\(.*/, "", type);
-    sub(/^\w+\(/, "", list); sub(/\)$/, "", list);
+    sub(/^.*\(/, "", list); sub(/\)$/, "", list);
     count = split (list, fields, /,/);
     for (field = 1; field <= count; field++) {
       output = output""convert[type]" ("feature"."fields[field]"),\n\t\t\t";