pyrite-dev/milsko
pyrite-dev/milsko
12
1
Fork 3
Code Issues 5 Pull requests Projects Releases 7 Packages Wiki Activity Actions

fix perl files
All checks were successful
pyrite-dev/milsko/pipeline/head This commit looks good
Details

Browse source
This commit is contained in:
Nishi 2026-07-20 06:21:25 +09:00
commit a30d306da0
5 changed files with 17 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

3
pl/rules.pl
View file

@ -66,7 +66,8 @@ if (grep(/^wayland$/, @backends)) {
scan_wayland_protocol("unstable", "primary-selection", "-unstable-v1");
scan_wayland_protocol("unstable", "pointer-constraints", "-unstable-v1");
scan_wayland_protocol("unstable", "relative-pointer", "-unstable-v1");
scan_wayland_protocol_from_file("wlr-layer-shell", "wlr-layer-shell-unstable-v1.xml");
scan_wayland_protocol_from_file("wlr-layer-shell",
"wlr-layer-shell-unstable-v1.xml");
$gl_libs = "-lGL -lGLU";
}

13
pl/utils.pl
View file

@ -125,21 +125,19 @@ sub scan_wayland_protocol {
}
}
sub scan_wayland_protocol_from_file {
my $proto = $_[0];
my $file = $_[1];
my $proto = $_[0];
my $file = $_[1];
my $proto_c = "src/backend/wayland/wayland-${proto}-protocol.c";
if (
system(
"wayland-scanner private-code ./resource/wayland/${file} ${proto_c}"
"wayland-scanner private-code ./resource/wayland/${file} ${proto_c}"
) != 0
)
{
print(
"^ Error on getting private code for ./resource/wayland/${file}\n"
);
"^ Error on getting private code for ./resource/wayland/${file}\n");
}
else {
new_object($proto_c);
@ -151,12 +149,11 @@ sub scan_wayland_protocol_from_file {
)
{
print(
"^ Error on getting client header for ./resource/wayland/${file}\n"
"^ Error on getting client header for ./resource/wayland/${file}\n"
);
}
}
our %params = ();
sub param_set {