diff --git a/capplets/appearance/ChangeLog b/capplets/appearance/ChangeLog
index 0c47aee24..b3db8237a 100644
--- a/capplets/appearance/ChangeLog
+++ b/capplets/appearance/ChangeLog
@@ -1,3 +1,9 @@
+2007-10-26  Jens Granseuer  <jensgr@gmx.net>
+
+	* appearance-style.c: (cursor_theme_delete_cb), (style_init):
+	* theme-util.c: (theme_delete): make the cursor themes delete button
+	work
+
 2007-10-25  Jens Granseuer  <jensgr@gmx.net>
 
 	* appearance-style.c: (style_init):
diff --git a/capplets/appearance/appearance-style.c b/capplets/appearance/appearance-style.c
index 4bae37754..7d4c64a59 100644
--- a/capplets/appearance/appearance-style.c
+++ b/capplets/appearance/appearance-style.c
@@ -515,6 +515,12 @@ icon_theme_delete_cb (GtkWidget *button, AppearanceData *data)
   generic_theme_delete ("icon_themes_list", THEME_TYPE_ICON, data);
 }
 
+static void
+cursor_theme_delete_cb (GtkWidget *button, AppearanceData *data)
+{
+  generic_theme_delete ("cursor_themes_list", THEME_TYPE_CURSOR, data);
+}
+
 #ifdef HAVE_XCURSOR
 static void
 cursor_size_scale_value_changed_cb (GtkRange *range, AppearanceData *data)
@@ -920,6 +926,7 @@ style_init (AppearanceData *data)
   g_signal_connect (glade_xml_get_widget (data->xml, "gtk_themes_delete"), "clicked", (GCallback) gtk_theme_delete_cb, data);
   g_signal_connect (glade_xml_get_widget (data->xml, "window_themes_delete"), "clicked", (GCallback) window_theme_delete_cb, data);
   g_signal_connect (glade_xml_get_widget (data->xml, "icon_themes_delete"), "clicked", (GCallback) icon_theme_delete_cb, data);
+  g_signal_connect (glade_xml_get_widget (data->xml, "cursor_themes_delete"), "clicked", (GCallback) cursor_theme_delete_cb, data);
 
   gnome_theme_info_register_theme_change ((ThemeChangedCallback) changed_on_disk_cb, data);
 }
diff --git a/capplets/appearance/theme-util.c b/capplets/appearance/theme-util.c
index 055632455..dd521f291 100644
--- a/capplets/appearance/theme-util.c
+++ b/capplets/appearance/theme-util.c
@@ -68,6 +68,11 @@ theme_delete (const gchar *name, ThemeType type)
       theme_dir = g_strdup (((GnomeThemeMetaInfo *) theme)->path);
       break;
 
+    case THEME_TYPE_CURSOR:
+      theme = gnome_theme_cursor_info_find (name);
+      theme_dir = g_build_filename (((GnomeThemeCursorInfo *) theme)->path, "cursors", NULL);
+      break;
+
     default:
       return FALSE;
   }