# HG changeset patch
# User Heiko Schlittermann (JUMPER) <hs@schlittermann.de>
# Date 1378033281 -7200
# Node ID 5b81887c26e9a65a06cd596ffdd3f387b11c275a
# Parent  3b312ac90a159492bdfa2d1479a23f78dcd18b54
exclude ^\.hg.*

diff -r 3b312ac90a15 -r 5b81887c26e9 install
--- a/install	Sun Sep 01 12:59:50 2013 +0200
+++ b/install	Sun Sep 01 13:01:21 2013 +0200
@@ -20,7 +20,7 @@
 
 my @exclude = map { qr/$_/xms } qw(
   ^\.\.?$
-  ^\.hg$
+  ^\.hg
   ), basename $PROGRAM_NAME;
 
 ... if $opt_force;