blob: 4a4d48fd4a9cabbf3c08848cbb71014b2591d847 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
/* Wrapper for debpkg so that we don't have to use suidperl any longer
(it's deprecated as of Perl 5.8.0) */
#include <stdio.h>
#include <unistd.h>
#include <errno.h>
#include <string.h>
#define REAL_PATH "/usr/share/devscripts/debpkg"
int main(int ac, char **av)
{
execv(REAL_PATH, av);
fprintf(stderr, "Error executing debpkg: %s\n", strerror(errno));
return 1;
}
|
