ÿØÿà JFIF      ÿÛ C      

!"$"$ÿÛ C  ÿÂ p " ÿÄ              ÿÄ             ÿÚ    ÕÔË®
(%	aA*‚XYD¡(J„¡E¢RE,P€XYae )(E¤²€B¤R¥	BQ¤¢ X«)X…€¤   @  

  ..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     ÿØÿà JFIF      ÿÛ C      

!"$"$ÿÛ C  ÿÂ p " ÿÄ              ÿÄ             ÿÚ    ÕÔË®
(%	aA*‚XYD¡(J„¡E¢RE,P€XYae )(E¤²€B¤R¥	BQ¤¢ X«)X…€¤   @  

  ..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     (* Parses entries in /etc/securetty

   Author: Simon Josi <josi@yokto.net> 
*)
module Securetty =
   autoload xfm

   let word = /[^ \t\n#]+/
   let eol = Util.eol
   let empty = Util.empty
   let comment = Util.comment
   let comment_or_eol = Util.comment_or_eol

   let record = [ seq "securetty" . store word . comment_or_eol ]
   let lns = ( empty | comment | record )*

   let filter = (incl "/etc/securetty")
   let xfm = transform lns filter
