diff --git a/yard/scripts/make_debian b/yard/scripts/make_debian
index 3b7214f..ab2ca67 100755
--- a/yard/scripts/make_debian
+++ b/yard/scripts/make_debian
@@ -64,6 +64,7 @@ libterm-readline-gnu-perl);
 sub stuff {
 
 my $stuff = << "STUFF";
+$Id
 # Generated by make_debian.
 
 # This template creates a complete Debian system which is more streamlined 
@@ -232,6 +233,8 @@ return $stuff;
 
 use strict;
 use File::Basename;
+my $rm = "\$";
+$main::Id = "# \$Id$rm"; 
 my $sbin = grep(/\/usr\/sbin/,$ENV{'PATH'});
 if ($sbin == 0) {
     $ENV{'PATH'} = "/usr/sbin:" . $ENV{'PATH'};