remove example comments

diff --git a/snom.pl b/snom.pl
index 43ea498..bbb359d 100755 (executable)
--- a/snom.pl
+++ b/snom.pl
@@ -1,5 +1,5 @@
 #!/bin/sh
 #!/bin/sh

-#$Id: snom.pl,v 1.6 2006-05-21 13:07:24 simigern Exp $
+#$Id: snom.pl,v 1.7 2006-05-21 13:08:52 simigern Exp $

 
 PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@"
 
 
 PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@"
 


@@ -324,12 +324,8 @@ sub KBDInput
        return FALSE;
 }
 
        return FALSE;
 }
 

-### Callback function to close the window

 sub CloseAppWindow
 {
        $window->destroy;
        return TRUE;
 }
 sub CloseAppWindow
 {
        $window->destroy;
        return TRUE;
 }

-
-
-# END EXAMPLE PROGRAM