svn commit: samba r6782 - in branches/SAMBA_3_0/examples/scripts/perl: .

jerry at samba.org jerry at samba.org
Fri May 13 19:06:00 GMT 2005


Author: jerry
Date: 2005-05-13 19:06:00 +0000 (Fri, 13 May 2005)
New Revision: 6782

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=6782

Log:
rename for consistency
Added:
   branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter.pl
Removed:
   branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter


Changeset:
Deleted: branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter
===================================================================
--- branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter	2005-05-13 12:22:21 UTC (rev 6781)
+++ branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter	2005-05-13 19:06:00 UTC (rev 6782)
@@ -1,27 +0,0 @@
-#!/usr/bin/perl
-##   Delete printer script for samba, APW, and cups
-##   Copyright (C) Gerald (Jerry) Carter <jerry at samba.rog>    2004
-##
-##   This program is free software; you can redistribute it
-##   and/or modify it under the terms of the GNU General
-##   Public License as published by the Free Software Foundation;
-##   ither version 2 of the License, or (at your option) any
-##   later version.
-##
-##   This program is distributed in the hope that it will be useful,
-##   but WITHOUT ANY WARRANTY; without even the implied warranty of
-##   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-##   GNU General Public License for more details.
-##
-##   You should have received a copy of the GNU General Public
-##   License along with this program; if not, write to the Free
-##   Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139,
-##   USA.
-
- at argv = @ARGV;
-
-# take in args
-my $lpname=shift(@argv);	# printer name
-
-system("/usr/sbin/lpadmin -x $lpname");
-

Copied: branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter.pl (from rev 6781, branches/SAMBA_3_0/examples/scripts/perl/smbdelprinter)



More information about the samba-cvs mailing list