1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
|
diff -up src/Gtk2-Notify-0.05/lib/Gtk2/Notify.pm.orig src/Gtk2-Notify-0.05/lib/Gtk2/Notify.pm
--- src/Gtk2-Notify-0.05/lib/Gtk2/Notify.pm.orig 2008-11-11 23:47:33.000000000 -0700
+++ src/Gtk2-Notify-0.05/lib/Gtk2/Notify.pm 2015-07-07 20:02:12.000000000 -0600
@@ -47,7 +47,7 @@ Version 0.04
use Gtk2::Notify -init, "app_name";
- my $notification = Gtk2::Notify->new($summary, $message, $icon, $attach_widget);
+ my $notification = Gtk2::Notify->new($summary, $message, $icon);
$notification->show;
=head1 INITIALISATION
diff -up src/Gtk2-Notify-0.05/t/notification.t.orig src/Gtk2-Notify-0.05/t/notification.t
--- src/Gtk2-Notify-0.05/t/notification.t.orig 2006-08-27 13:11:57.000000000 -0600
+++ src/Gtk2-Notify-0.05/t/notification.t 2015-07-07 20:09:52.000000000 -0600
@@ -2,20 +2,18 @@
use strict;
use warnings;
-use Gtk2::TestHelper tests => 35;
+use Gtk2::TestHelper tests => 31;
use Test::Exception;
use Gtk2::Notify -init, $0;
ginterfaces_ok('Gtk2::Notify');
-my $w = Gtk2::Window->new;
-my $n = Gtk2::Notify->new('foo', 'bar', '', $w);
+my $n = Gtk2::Notify->new('foo', 'bar', '');
isa_ok($n, 'Gtk2::Notify');
my @methods = qw(
add_action
- attach_to_widget
clear_actions
clear_hints
close
@@ -46,16 +44,6 @@ lives_ok(sub {
}, 42);
}, 'add_action');
-{
- my $nw = Gtk2::Window->new;
- lives_ok(sub {
- $n->attach_to_widget($nw);
- }, 'attach_to_widget');
- lives_ok(sub {
- $n->attach_to_widget($w);
- }, 'attach_to_widget');
-}
-
lives_ok(sub {
$n->clear_actions;
}, 'clear_actions with existing actions');
@@ -96,12 +84,6 @@ lives_ok(sub {
}, 'set_urgency');
lives_ok(sub {
- $n->close;
-}, 'close before show');
-
-$w->show_all;
-
-lives_ok(sub {
$n->show;
}, 'show');
diff -up src/Gtk2-Notify-0.05/xs/Notify.xs.orig src/Gtk2-Notify-0.05/xs/Notify.xs
--- src/Gtk2-Notify-0.05/xs/Notify.xs.orig 2007-10-04 06:11:13.000000000 -0600
+++ src/Gtk2-Notify-0.05/xs/Notify.xs 2015-07-07 20:05:37.000000000 -0600
@@ -21,8 +21,7 @@ PROTOTYPES: DISABLE
my $notification = Gtk2::Notify->new(
$summary,
$message,
- $icon,
- $attach_widget
+ $icon
);
$notification->show;
@@ -86,26 +85,12 @@ notify_get_server_info (class, OUTLIST c
MODULE = Gtk2::Notify PACKAGE = Gtk2::Notify PREFIX = notify_notification_
NotifyNotification *
-notify_notification_new (class, summary, body=NULL, icon=NULL, attach=NULL)
+notify_notification_new (class, summary, body=NULL, icon=NULL)
const gchar *summary
const gchar *body
const gchar *icon
- GtkWidget_ornull *attach
C_ARGS:
- summary, body, icon, attach
-
-#if GTK_CHECK_VERSION (2, 9, 2)
-
-NotifyNotification *
-notify_notification_new_with_status_icon (class, summary, body=NULL, icon=NULL, status_icon=NULL)
- const gchar *summary
- const gchar *body
- const gchar *icon
- GtkStatusIcon *status_icon
- C_ARGS:
- summary, body, icon, status_icon
-
-#endif
+ summary, body, icon
gboolean
notify_notification_update (notification, summary, message=NULL, icon=NULL)
@@ -114,27 +99,6 @@ notify_notification_update (notification
const gchar *message
const gchar *icon
-void
-notify_notification_attach_to_widget (notification, attach)
- NotifyNotification *notification
- GtkWidget *attach
-
-#if GTK_CHECK_VERSION (2, 9, 2)
-
-void
-notify_notification_attach_to_status_icon (notification, status_icon)
- NotifyNotification *notification
- GtkStatusIcon *status_icon
-
-#endif
-
-void
-notify_notification_set_geometry_hints (notification, screen, x, y)
- NotifyNotification *notification
- GdkScreen *screen
- gint x
- gint y
-
NO_OUTPUT gboolean
notify_notification_show (notification)
NotifyNotification *notification
@@ -168,6 +132,11 @@ notify_notification_set_icon_from_pixbuf
GdkPixbuf *icon
void
+notify_notification_set_image_from_pixbuf (notification, image)
+ NotifyNotification *notification
+ GdkPixbuf *image
+
+void
set_hint (notification, key, value)
NotifyNotification *notification
const gchar *key
@@ -265,6 +234,10 @@ notify_notification_close (notification)
gperl_croak_gerror (NULL, error);
}
+gint
+notify_notification_get_closed_reason(notification)
+ NotifyNotification *notification
+
BOOT:
#include "register.xsh"
#include "boot.xsh"
|