Deprecated commands removal.

2 files changed, 0 insertions, 25 deletions

diff --git a/packaging/Caldera/OpenLinux/convertsmbpasswd.perl b/packaging/Caldera/OpenLinux/convertsmbpasswd.perl
deleted file mode 100755
index 6b83886cd4d..00000000000
--- a/packaging/Caldera/OpenLinux/convertsmbpasswd.perl
+++ /dev/null
@@ -1,15 +0,0 @@
-#!/usr/bin/perl -w
-#
-# Convert a Samba 1.9.18 smbpasswd file format into
-# a Samba 2.0 smbpasswd file format.
-# Read from stdin and write to stdout for simplicity.
-# Set the last change time to the time of conversion.
-while ( <> ) {
-  @V = split(/:/);
-  if ( ! /^\#/ ) {
-    $V[6] = $V[4] . "\n";
-    $V[5] = sprintf( "LCT-%X", time());
-    $V[4] = "[U          ]";
-  }
-  print( join( ':', @V));
-}
diff --git a/packaging/Caldera/OpenLinux/updatesmbpasswd.perl b/packaging/Caldera/OpenLinux/updatesmbpasswd.perl
deleted file mode 100755
index 60f572b4905..00000000000
--- a/packaging/Caldera/OpenLinux/updatesmbpasswd.perl
+++ /dev/null
@@ -1,10 +0,0 @@
-#!/usr/bin/perl -w
-while ( <> ) {
-  print;
-  @V = split(/:/);
-  $_ = $V[3];
-  if ( $V[0] !~ /^\#/ && !(/^[0-9A-F]{32}$/ || /^X{32}$/ || /^\*{32}$/) ) {
-    $V[3] = "X" x 32;
-  }
-  print( join( ':', @V));
-}