comparison: plugins/perl.c
plugins/perl.c
- changeset 785
- fcf85892216c
- parent 749
- b904907252d3
equal
deleted
inserted
replaced
| 784:233b07f61a0c | 785:fcf85892216c |
|---|---|
| 19 char *description() { | 19 char *description() { |
| 20 return "Interface for loading perl scripts"; | 20 return "Interface for loading perl scripts"; |
| 21 } | 21 } |
| 22 | 22 |
| 23 int gaim_plugin_init(void *h) { | 23 int gaim_plugin_init(void *h) { |
| 24 perl_init(); | |
| 25 } | 24 } |
| 26 | 25 |
| 27 static GtkWidget *config = NULL; | 26 static GtkWidget *config = NULL; |
| 28 static GtkWidget *entry = NULL; | 27 static GtkWidget *entry = NULL; |
| 29 | 28 |
| 100 gtk_widget_show(config); | 99 gtk_widget_show(config); |
| 101 } | 100 } |
| 102 | 101 |
| 103 void gaim_plugin_remove() { | 102 void gaim_plugin_remove() { |
| 104 if (config) gtk_widget_destroy(config); | 103 if (config) gtk_widget_destroy(config); |
| 105 perl_end(); | |
| 106 } | 104 } |
