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