diff options
| author | Po Lu | 2022-02-06 09:18:59 +0800 |
|---|---|---|
| committer | Po Lu | 2022-02-06 09:18:59 +0800 |
| commit | b38c0d6a2ff2dca89e9bf5feed49b7708ebf9942 (patch) | |
| tree | e9f1b7077a58a2f6d3d7874b96dccce87305af9b /src/pgtkselect.c | |
| parent | 9c1d6b1d6a24338517756437757cc4aaaa4da4e5 (diff) | |
| download | emacs-b38c0d6a2ff2dca89e9bf5feed49b7708ebf9942.tar.gz emacs-b38c0d6a2ff2dca89e9bf5feed49b7708ebf9942.zip | |
Clean up lots of #ifdef'd out code in PGTK files
Most of them are either relics from X or from the NS code
pgtkfns.c was copied from whole.
* src/pgtkfns.c (x_icon):
(pgtk_set_scroll_bar_foreground):
(pgtk_set_scroll_bar_background):
(Fx_create_frame):
(pgtk_window_is_ancestor):
(x_create_tip_frame):
* src/pgtkselect.c (syms_of_pgtkselect):
* src/pgtkterm.c (pgtk_iconify_frame):
(x_set_frame_alpha):
(button_event): Remove defined out code that cannot make sense.
* src/pgtkmenu.c (show_help_event): Remove ifdef'd out code and
reword comment.
Diffstat (limited to 'src/pgtkselect.c')
| -rw-r--r-- | src/pgtkselect.c | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/pgtkselect.c b/src/pgtkselect.c index 23a79895d54..24fed19cd23 100644 --- a/src/pgtkselect.c +++ b/src/pgtkselect.c | |||
| @@ -36,10 +36,6 @@ GNUstep port and post-20 update by Adrian Robert (arobert@cogsci.ucsd.edu) | |||
| 36 | #include "pgtkselect.h" | 36 | #include "pgtkselect.h" |
| 37 | #include <gdk/gdk.h> | 37 | #include <gdk/gdk.h> |
| 38 | 38 | ||
| 39 | #if 0 | ||
| 40 | static Lisp_Object Vselection_alist; | ||
| 41 | #endif | ||
| 42 | |||
| 43 | static GQuark quark_primary_data = 0; | 39 | static GQuark quark_primary_data = 0; |
| 44 | static GQuark quark_primary_size = 0; | 40 | static GQuark quark_primary_size = 0; |
| 45 | static GQuark quark_secondary_data = 0; | 41 | static GQuark quark_secondary_data = 0; |
| @@ -606,11 +602,6 @@ syms_of_pgtkselect (void) | |||
| 606 | defsubr (&Spgtk_selection_exists_p); | 602 | defsubr (&Spgtk_selection_exists_p); |
| 607 | defsubr (&Spgtk_selection_owner_p); | 603 | defsubr (&Spgtk_selection_owner_p); |
| 608 | 604 | ||
| 609 | #if 0 | ||
| 610 | Vselection_alist = Qnil; | ||
| 611 | staticpro (&Vselection_alist); | ||
| 612 | #endif | ||
| 613 | |||
| 614 | DEFVAR_LISP ("pgtk-sent-selection-hooks", Vpgtk_sent_selection_hooks, | 605 | DEFVAR_LISP ("pgtk-sent-selection-hooks", Vpgtk_sent_selection_hooks, |
| 615 | "A list of functions to be called when Emacs answers a selection request.\n\ | 606 | "A list of functions to be called when Emacs answers a selection request.\n\ |
| 616 | The functions are called with four arguments:\n\ | 607 | The functions are called with four arguments:\n\ |