Added Id tag

[tpope-extra.git] / perl / mobile-phone-monitor

diff --git a/perl/mobile-phone-monitor b/perl/mobile-phone-monitor
index 246cad502b0ed1c5a32c3b7fec8e1f021377b13d..249f5a56087527d963c3d2e97eb557bd50746e72 100755 (executable)
--- a/perl/mobile-phone-monitor
+++ b/perl/mobile-phone-monitor
@@ -1,5 +1,6 @@
 #!/usr/bin/perl
-# Author: Tim Pope
+# $Id$
+# -*- perl -*- vim: ft=perl sw=4 sts=4
 
 # Monitors a bluetooth mobile phome for calls.  You'll need to bind rfcomm1 to
 # your mobile phone's SP service.  You'll also need my Device::Nokia module