Add a regression test for hostname / nss_myhostname

Issue #1248.
This commit is contained in:
Eelco Dolstra 2013-11-26 18:52:34 +01:00
parent 953f12995b
commit e8baaba044
2 changed files with 8 additions and 2 deletions

View file

@ -68,8 +68,8 @@ rec {
# the first interface (i.e. the first network in its # the first interface (i.e. the first network in its
# virtualisation.vlans option). # virtualisation.vlans option).
networking.extraHosts = flip concatMapStrings machines networking.extraHosts = flip concatMapStrings machines
(m: let config = (getAttr m nodes).config; in (m': let config = (getAttr m' nodes).config; in
optionalString (config.networking.primaryIPAddress != "") optionalString (m.first != m' && config.networking.primaryIPAddress != "")
("${config.networking.primaryIPAddress} " + ("${config.networking.primaryIPAddress} " +
"${config.networking.hostName}\n")); "${config.networking.hostName}\n"));

View file

@ -59,6 +59,12 @@
subtest "override-env-var", sub { subtest "override-env-var", sub {
$machine->succeed('[ "$EDITOR" = emacs ]'); $machine->succeed('[ "$EDITOR" = emacs ]');
}; };
# Test whether hostname (and by extension nss_myhostname) works.
subtest "hostname", sub {
$machine->succeed('[ "`hostname`" = machine ]');
$machine->succeed('[ "`hostname -s`" = machine ]');
};
''; '';
} }