=================================================================== RCS file: /cvs/openbsd/update_openbsd/post_dmesg_to_nycbug,v retrieving revision 1.8 retrieving revision 1.10 diff -u -r1.8 -r1.10 --- openbsd/update_openbsd/post_dmesg_to_nycbug 2016/10/04 06:27:00 1.8 +++ openbsd/update_openbsd/post_dmesg_to_nycbug 2017/10/01 03:45:24 1.10 @@ -28,16 +28,19 @@ my $description = "@ARGV"; -while ( @sysctls and not $description ) { - $description = sysctl @{ shift @sysctls }; -} +unless ($description) { + while ( @sysctls and not $description ) { + $description = sysctl @{ shift @sysctls }; + } -if (my $version = sysctl qw( kern.version )) { - $version =~ s/\)\K.*//; - $description = "$version on $description"; + if (my $version = sysctl qw( kern.version )) { + my $machine = sysctl qw( hw.machine ); + $version =~ s/\)\K.*/ $machine/; + $description = "$version on $description"; + } } -print "About to post '$description', OK? "; +print "'$description'\nAbout to post, OK? "; readline STDIN; open my $dm, '<', '/var/run/dmesg.boot' or die $!;