From 4a5a402ac4314f085028bfd3fa0b3c616af67ba1 Mon Sep 17 00:00:00 2001 From: Gerald Carter Date: Fri, 13 May 2005 19:06:00 +0000 Subject: r6782: rename for consistency (This used to be commit 86724c5c5f4270be63cb119beb7c1cb041551439) --- examples/scripts/perl/smbdelprinter | 27 --------------------------- examples/scripts/perl/smbdelprinter.pl | 27 +++++++++++++++++++++++++++ 2 files changed, 27 insertions(+), 27 deletions(-) delete mode 100755 examples/scripts/perl/smbdelprinter create mode 100755 examples/scripts/perl/smbdelprinter.pl diff --git a/examples/scripts/perl/smbdelprinter b/examples/scripts/perl/smbdelprinter deleted file mode 100755 index 30daf24b35..0000000000 --- a/examples/scripts/perl/smbdelprinter +++ /dev/null @@ -1,27 +0,0 @@ -#!/usr/bin/perl -## Delete printer script for samba, APW, and cups -## Copyright (C) Gerald (Jerry) Carter 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. - -@argv = @ARGV; - -# take in args -my $lpname=shift(@argv); # printer name - -system("/usr/sbin/lpadmin -x $lpname"); - diff --git a/examples/scripts/perl/smbdelprinter.pl b/examples/scripts/perl/smbdelprinter.pl new file mode 100755 index 0000000000..30daf24b35 --- /dev/null +++ b/examples/scripts/perl/smbdelprinter.pl @@ -0,0 +1,27 @@ +#!/usr/bin/perl +## Delete printer script for samba, APW, and cups +## Copyright (C) Gerald (Jerry) Carter 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. + +@argv = @ARGV; + +# take in args +my $lpname=shift(@argv); # printer name + +system("/usr/sbin/lpadmin -x $lpname"); + -- cgit