perl-Gtk2-Notify
This commit is contained in:
4fury-c3440d8
@@ -0,0 +1,20 @@
|
|||||||
|
#!/usr/bin/python
|
||||||
|
# -*- coding: utf-8 -*-
|
||||||
|
#
|
||||||
|
# Licensed under the GNU General Public License, version 3.
|
||||||
|
# See the file https://www.gnu.org/licenses/gpl-3.0.txt
|
||||||
|
|
||||||
|
from pisi.actionsapi import perlmodules
|
||||||
|
|
||||||
|
def setup():
|
||||||
|
perlmodules.configure()
|
||||||
|
|
||||||
|
def build():
|
||||||
|
perlmodules.make()
|
||||||
|
|
||||||
|
def check():
|
||||||
|
pass
|
||||||
|
#perlmodules.make("test") <!-- cannot open display -->
|
||||||
|
|
||||||
|
def install():
|
||||||
|
perlmodules.install()
|
||||||
@@ -0,0 +1,114 @@
|
|||||||
|
http://bugs.gentoo.org/398699
|
||||||
|
http://rt.cpan.org/Public/Bug/Display.html?id=67297
|
||||||
|
http://pkgs.fedoraproject.org/gitweb/?p=perl-Gtk2-Notify.git;a=blob_plain;f=libnotify.patch;hb=HEAD
|
||||||
|
|
||||||
|
--- t/notification.t
|
||||||
|
+++ t/notification.t
|
||||||
|
@@ -2,20 +2,18 @@
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
-use Gtk2::TestHelper tests => 35;
|
||||||
|
+use Gtk2::TestHelper tests => 32;
|
||||||
|
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');
|
||||||
|
@@ -99,8 +87,6 @@ lives_ok(sub {
|
||||||
|
$n->close;
|
||||||
|
}, 'close before show');
|
||||||
|
|
||||||
|
-$w->show_all;
|
||||||
|
-
|
||||||
|
lives_ok(sub {
|
||||||
|
$n->show;
|
||||||
|
}, 'show');
|
||||||
|
--- xs/Notify.xs
|
||||||
|
+++ xs/Notify.xs
|
||||||
|
@@ -86,26 +86,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 +100,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
|
||||||
@@ -0,0 +1,65 @@
|
|||||||
|
<?xml version="1.0" ?>
|
||||||
|
<!DOCTYPE PISI SYSTEM "https://pisilinux.org/projeler/pisi/pisi-spec.dtd">
|
||||||
|
<PISI>
|
||||||
|
<Source>
|
||||||
|
<Name>perl-Gtk2-Notify</Name>
|
||||||
|
<Homepage>https://metacpan.org/pod/Gtk2::Notify</Homepage>
|
||||||
|
<Packager>
|
||||||
|
<Name>fury</Name>
|
||||||
|
<Email>uglyside@yandex.ru</Email>
|
||||||
|
</Packager>
|
||||||
|
<License>GPL-2</License>
|
||||||
|
<IsA>library</IsA>
|
||||||
|
<PartOf>programming.language.perl</PartOf>
|
||||||
|
<Summary>Perl interface to libnotify.</Summary>
|
||||||
|
<Description>Gtk2::Notify - Perl interface to libnotify.</Description>
|
||||||
|
<Archive sha1sum="b0223dd5a85358c9b92ebc99040201e640612348" type="targz">
|
||||||
|
https://cpan.metacpan.org/authors/id/F/FL/FLORA/Gtk2-Notify-0.05.tar.gz
|
||||||
|
</Archive>
|
||||||
|
<BuildDependencies>
|
||||||
|
<Dependency>perl</Dependency>
|
||||||
|
<Dependency>perl-Gtk2</Dependency>
|
||||||
|
<Dependency>gtk2-devel</Dependency>
|
||||||
|
<Dependency>libnotify-devel</Dependency>
|
||||||
|
<Dependency>perl-Module-Install</Dependency>
|
||||||
|
<Dependency>perl-Test-Exception</Dependency>
|
||||||
|
<Dependency>perl-ExtUtils-Depends</Dependency>
|
||||||
|
<Dependency>perl-ExtUtils-PkgConfig</Dependency>
|
||||||
|
<Dependency>perl-Module-Build-XSUtil</Dependency>
|
||||||
|
</BuildDependencies>
|
||||||
|
<Patches>
|
||||||
|
<Patch level='0'>libnotify.patch</Patch>
|
||||||
|
</Patches>
|
||||||
|
</Source>
|
||||||
|
|
||||||
|
<Package>
|
||||||
|
<Name>perl-Gtk2-Notify</Name>
|
||||||
|
<RuntimeDependencies>
|
||||||
|
<Dependency>atk</Dependency>
|
||||||
|
<Dependency>gtk2</Dependency>
|
||||||
|
<Dependency>perl</Dependency>
|
||||||
|
<Dependency>cairo</Dependency>
|
||||||
|
<Dependency>pango</Dependency>
|
||||||
|
<Dependency>freetype</Dependency>
|
||||||
|
<Dependency>harfbuzz</Dependency>
|
||||||
|
<Dependency>perl-Gtk2</Dependency>
|
||||||
|
<Dependency>libnotify</Dependency>
|
||||||
|
<Dependency>gdk-pixbuf</Dependency>
|
||||||
|
<Dependency>fontconfig</Dependency>
|
||||||
|
</RuntimeDependencies>
|
||||||
|
<Files>
|
||||||
|
<Path fileType="data">/usr/lib/perl5/vendor_perl</Path>
|
||||||
|
<Path fileType="data">/usr/share/man</Path>
|
||||||
|
</Files>
|
||||||
|
</Package>
|
||||||
|
|
||||||
|
<History>
|
||||||
|
<Update release="1">
|
||||||
|
<Date>2023-01-08</Date>
|
||||||
|
<Version>0.05</Version>
|
||||||
|
<Comment>First build.</Comment>
|
||||||
|
<Name>fury</Name>
|
||||||
|
<Email>uglyside@yandex.ru</Email>
|
||||||
|
</Update>
|
||||||
|
</History>
|
||||||
|
</PISI>
|
||||||
Reference in New Issue
Block a user