gtk2:

  - add Has_GtkFileSystem define
  - hide filesystem macroses by $ifdef block
fixes #0011837

git-svn-id: trunk@11651 -

packages/gtk2/src/gtk+/gtk/gtk2.pas

@@ -63,6 +63,8 @@ unit gtk2; // keep unit name lowercase for kylix
 {$DEFINE HasGTK2_8}
 {$ENDIF}
 
+// {$define HasGTK_FileSystem}
+
 interface
 
 uses

packages/gtk2/src/gtk+/gtk/gtkfilesystem.inc

@@ -115,17 +115,14 @@ type
 
 {$IFDEF read_interface_rest}
 
+{$ifdef HasGTK_FileSystem}
 
 { GError enumeration for GtkFileSystem  }
 
 function GTK_FILE_SYSTEM_ERROR : TGQuark;
 
-
-
 function gtk_file_system_error_quark:TGQuark;cdecl;external gtklib name 'gtk_file_system_error_quark';
 
-
-
 { Boxed-type for gtk_file_folder_get_info() results  }
 
 function GTK_TYPE_FILE_INFO : GType;
@@ -244,11 +241,16 @@ procedure gtk_file_paths_free(paths:PGSList);cdecl;external gtklib name 'gtk_fil
 { GtkFileSystem modules support  }
 
 function _gtk_file_system_create(file_system_name:Pchar):PGtkFileSystem;cdecl;external gtklib name '_gtk_file_system_create';
+
+{$endif HasGTK_FileSystem}
+
 {$endif}  {read_interface_rest}
 
 
 {$ifdef read_implementation}
 
+{$ifdef HasGTK_FileSystem}
+
 function GTK_FILE_SYSTEM_ERROR : TGQuark;
   begin
      GTK_FILE_SYSTEM_ERROR:=gtk_file_system_error_quark;
@@ -307,6 +309,8 @@ begin
    GTK_FILE_FOLDER_GET_IFACE:=G_TYPE_INSTANCE_GET_INTERFACE(inst,GTK_TYPE_FILE_FOLDER);
 end;
 
+{$endif HasGTK_FileSystem}
+
 function gtk_file_path_new_dup(str : Pgchar) : PGtkFilePath;
 begin
    gtk_file_path_new_dup:=PGtkFilePath(g_strdup(str));