--- lib/TWiki/Query/Node.pm.dist	2007-12-09 20:35:51.000000000 +0100
+++ lib/TWiki/Query/Node.pm	2007-12-09 21:06:59.000000000 +0100
@@ -95,6 +95,18 @@
             # Special accessor to compensate for lack of a web
             # name anywhere in the saved fields of meta
             return $data->web();
+	} elsif ($realField eq 'type') {
+	    # Special accessor returing all of the classes this belongs to
+            my @type=();
+	    my $form=$data->get('FORM');
+            push(@type,$form->{name}) if(defined $form);
+          
+            my $base=$data->get('BASE');
+            if($base) {
+              push(@type,split(/,/,$base->{value}));
+            }
+	    return join(',',@type);
+	    return "DataDefinition.DossierForm";
         } else {
             # The field name isn't an alias, check to see if it's
             # the form name