From da5a5c6d5546aad5bc92e3255eaa6d9710c67426 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Mon, 20 Feb 2012 00:30:21 -0800 Subject: adding --- bin/19commit | 26 -------------------------- 1 file changed, 26 deletions(-) delete mode 100755 bin/19commit (limited to 'bin/19commit') diff --git a/bin/19commit b/bin/19commit deleted file mode 100755 index 0b4cd05db..000000000 --- a/bin/19commit +++ /dev/null @@ -1,26 +0,0 @@ -#!/usr/bin/perl - -# usage: 19commit 'log message' filename filename ... - -use Cwd; -use String::ShellQuote; - -my $USER = $ENV{USER}; - -my $dir = getcwd; -( my $prefix = $dir ) =~ s(^/home/$USER/freeside/?)() or die $dir; #eventually from anywhere - -my $desc = shell_quote(shift @ARGV); # -m - -die "no files!" unless @ARGV; - -#warn "$prefix"; - -#print <