[gnumeric] Paste: support Biff8 via Citrix.

[Morten Welinder <mortenw src gnome org>]

commit 45354eabf8dd9796c9ab1547fb7d4bd751f6c68d
Author: Morten Welinder <terra gnome org>
Date:   Fri Oct 16 13:13:54 2009 -0400

    Paste: support Biff8 via Citrix.

 ChangeLog           |    3 +++
 src/gui-clipboard.c |    8 ++++++++
 2 files changed, 11 insertions(+), 0 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index ea20cb2..80c9c5e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2009-10-16  Morten Welinder  <terra gnome org>
 
+	* src/gui-clipboard.c: Support Biff8 via Citrix which yields a
+	different target name.
+
 	* src/gnm-so-line.c (gnm_so_line_prep_sax_parser): Read new
 	format.
 	(gnm_so_line_write_xml_sax): Write both arrow ends.
diff --git a/src/gui-clipboard.c b/src/gui-clipboard.c
index 4ed84b6..28061d9 100644
--- a/src/gui-clipboard.c
+++ b/src/gui-clipboard.c
@@ -70,8 +70,14 @@ typedef struct {
 #define GNUMERIC_ATOM_INFO 2001
 #define GOFFICE_GRAPH_ATOM_NAME "application/x-goffice-graph"
 
+/*
+ * Emacs hack:
+ * (x-get-selection-internal 'CLIPBOARD 'TARGETS)
+ */
+
 /* From MS Excel */
 #define BIFF8_ATOM_NAME	"Biff8"
+#define BIFF8_ATOM_NAME_CITRIX "_CITRIX_Biff8"
 #define BIFF5_ATOM_NAME	"Biff5"
 #define BIFF4_ATOM_NAME	"Biff4"
 #define BIFF3_ATOM_NAME	"Biff3"
@@ -365,6 +371,7 @@ table_content_received (GtkClipboard *clipboard, GtkSelectionData *sel,
 						 pt, sel->data,
 						 sel->length);
 	} else if ((sel->target == gdk_atom_intern ( BIFF8_ATOM_NAME, FALSE)) ||
+		   (sel->target == gdk_atom_intern ( BIFF8_ATOM_NAME_CITRIX, FALSE)) ||
 		   (sel->target == gdk_atom_intern ( BIFF5_ATOM_NAME, FALSE)) ||
 		   (sel->target == gdk_atom_intern ( BIFF4_ATOM_NAME, FALSE)) ||
 		   (sel->target == gdk_atom_intern ( BIFF3_ATOM_NAME, FALSE)) ||
@@ -421,6 +428,7 @@ x_targets_received (GtkClipboard *clipboard, GdkAtom *targets,
 		GNUMERIC_ATOM_NAME,
 
 		BIFF8_ATOM_NAME,
+		BIFF8_ATOM_NAME_CITRIX,
 		BIFF5_ATOM_NAME,
 		BIFF4_ATOM_NAME,
 		BIFF3_ATOM_NAME,