diff --git a/samples/locate/locate~ b/samples/locate/locate~
deleted file mode 100755
index d5dc1cf..0000000
--- a/samples/locate/locate~
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/bin/sh
-#
-# simple locate alike
-# written as an example how to
-# use dbtool.
-#
-# locate searches the database
-# for a file which matches a
-# certain string. The parameter
-# to locate can be a fully perl-
-# compliant regular expression.
-#
-# $Id: locate,v 1.3 2001/06/26 23:00:02 scip Exp $
-
-dbtool="/usr/bin/dbtool";
-find="/usr/bin/find";
-db="/var/local/locate.db";
-sort="/bin/sort";
-regex=$1;
-
-if [ "x$regex" != "x" ]; then
-    $dbtool -d $db -S -k $regex -w -R;
-else
-    echo "Usage: locate <expression>";
-fi
diff --git a/samples/locate/updatedb~ b/samples/locate/updatedb~
deleted file mode 100755
index a6ce26e..0000000
--- a/samples/locate/updatedb~
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/bin/sh
-#
-# simple locate alike
-# written as an example how to
-# use dbtool.
-#
-# updatedb creates the database
-# which is then used by locate
-# to search for a certain string.
-#
-# $Id: updatedb,v 1.2 2001/06/26 23:00:02 scip Exp $
-#
-
-dbtool="/usr/bin/dbtool";
-find="/usr/bin/find";
-db="/var/local/locate.db";
-egrep="/bin/egrep";
-cp="/bin/cp"
-
-$cp /dev/null $db;
-$find / -ls | $egrep -v "^\/proc|dev|tmp" | $dbtool -d $db -i -f -R -t "^(.+?) (\/.*)$";