chiark / gitweb /
random-word: Some perl-mode emacs formatting glitch workarounds.
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 4 Sep 2013 20:29:33 +0000 (21:29 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 4 Sep 2013 20:29:33 +0000 (21:29 +0100)
debian/changelog
scripts/random-word

index 8db8616..6bd8b40 100644 (file)
@@ -1,3 +1,9 @@
+chiark-utils (4.2.1~~iwj1) unstable; urgency=low
+
+  * random-word: Some perl-mode emacs formatting glitch workarounds.
+
+ --
+
 chiark-utils (4.2.1~~iwj) unstable; urgency=low
 
   * Make xbatmon-simple tolerate the lack of "type" in power supply uevent
index 66d09a2..ddd6c52 100755 (executable)
@@ -34,9 +34,9 @@ while ($ARGV[0] =~ m/^\-/) {
     } elsif (m/^\-n(\d+)$/) {
        $want= $1;
     } elsif (m/^\-f/ && length > 2) {
-       $filename= $';
+       $filename= $'; #';
     } elsif (m/^\-r/ && length > 2) {
-       @randfile= ($');
+       @randfile= ($'); #');
     } elsif (m/^\-D$/) {
        open D, ">&STDERR" or fail("dup stderr for debug: $!");
     } else {