Blame lenses/login_defs.aug

Packit Service a2ae7a
(*
Packit Service a2ae7a
Module: Login_defs
Packit Service a2ae7a
  Lense for login.defs
Packit Service a2ae7a
Packit Service a2ae7a
Author: Erinn Looney-Triggs
Packit Service a2ae7a
Packit Service a2ae7a
About: License
Packit Service a2ae7a
  This file is licensed under the LGPL v2+, like the rest of Augeas.
Packit Service a2ae7a
Packit Service a2ae7a
About: Configuration files
Packit Service a2ae7a
   This lens applies to /etc/login.defs. See <filter>.
Packit Service a2ae7a
*)
Packit Service a2ae7a
module Login_defs =
Packit Service a2ae7a
autoload xfm
Packit Service a2ae7a
Packit Service a2ae7a
(* View: record
Packit Service a2ae7a
    A login.defs record *)
Packit Service a2ae7a
let record =
Packit Service a2ae7a
  let value = store /[^ \t\n]+([ \t]+[^ \t\n]+)*/ in
Packit Service a2ae7a
  [ key Rx.word . Sep.space . value . Util.eol ]
Packit Service a2ae7a
Packit Service a2ae7a
(* View: lns
Packit Service a2ae7a
    The login.defs lens *)
Packit Service a2ae7a
let lns = (record | Util.comment | Util.empty) *
Packit Service a2ae7a
Packit Service a2ae7a
(* View: filter *)
Packit Service a2ae7a
let filter = incl "/etc/login.defs"
Packit Service a2ae7a
Packit Service a2ae7a
let xfm = transform lns filter