Mercurial > repo

changeset 4285:5c5fc08f8113

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> sed -i \'2s!s/!s/no\\+dl/nooodl/;s/!\' bin/?
author HackBot
date Tue, 14 Jan 2014 00:55:13 +0000
parents 6a29d684ae63
children 1e110f9d6e37
files bin/? bin/@ bin/h
diffstat 3 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/bin/?	Mon Jan 13 02:37:57 2014 +0000
+++ b/bin/?	Tue Jan 14 00:55:13 2014 +0000
@@ -1,5 +1,5 @@
 #!/bin/sh
-topic=$(echo "$1" | lowercase | sed "s/ *$//")
+topic=$(echo "$1" | lowercase | sed "s/no+dl/nooodl/;s/ *$//")
 topic1=$(echo "$topic" | sed "s/s$//")
 cd wisdom
 if [ \( "$topic1" = "ngevd" \) -a \( -e ngevd \) ];
--- a/bin/@	Mon Jan 13 02:37:57 2014 +0000
+++ b/bin/@	Tue Jan 14 00:55:13 2014 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl -w
-$_ = join " ", @ARGV; if (s/^([^ ]*) +([^ ]*) +//) { print "$1: "; exec $2, $_; }
+$_ = join " ", @ARGV; if (s/no+dl/nooodl/;s/^([^ ]*) +([^ ]*) +//) { print "$1: "; exec $2, $_; }
--- a/bin/h	Mon Jan 13 02:37:57 2014 +0000
+++ b/bin/h	Tue Jan 14 00:55:13 2014 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl -p
-s/([aeiouy])([bcdfghjklmnpqrstvxz])/$1h$2/ig
+s/no+dl/nooodl/;s/([aeiouy])([bcdfghjklmnpqrstvxz])/$1h$2/ig