File: dh_testroot

package info (click to toggle)
debhelper 1.1.24
  • links: PTS
  • area: main
  • in suites: slink
  • size: 836 kB
  • ctags: 74
  • sloc: perl: 1,037; sh: 681; makefile: 360
file content (13 lines) | stat: -rwxr-xr-x 263 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#!/usr/bin/perl -w
#
# Checks to make sure you are root.

BEGIN { push @INC, "debian", "/usr/lib/debhelper" }
use Dh_Lib;
init();

# Test for uid = 0, not username of root, becuase
# some people rename root.
if ($< != 0) {
	error("You must run this as root.");
}