diff options
| author | Daniil Baturin <daniil@baturin.org> | 2017-01-20 23:56:32 +0700 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2017-01-20 23:56:32 +0700 |
| commit | 46efea7823acfef5230f33f4b27c99bc176aafbc (patch) | |
| tree | a919150390b4cdfe2874e958cf1287bf0181e42f /src/vyconfd.ml | |
| parent | 465bef917357629443b85256d1669404c91e90dd (diff) | |
| download | vyconf-46efea7823acfef5230f33f4b27c99bc176aafbc.tar.gz vyconf-46efea7823acfef5230f33f4b27c99bc176aafbc.zip | |
Use BatOption.defalt instead of homegrown equivalent.
If we are going to use batteries for numeric_compare, why not take
advantage of the rest.
Diffstat (limited to 'src/vyconfd.ml')
| -rw-r--r-- | src/vyconfd.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vyconfd.ml b/src/vyconfd.ml index c07b1b3..d8fa7c5 100644 --- a/src/vyconfd.ml +++ b/src/vyconfd.ml @@ -40,7 +40,7 @@ let make_session_token () = let setup_session world req = let token = make_session_token () in let user = "unknown user" in - let client_app = Util.substitute_default req.client_application "unknown client" in + let client_app = BatOption.default "unknown client" req.client_application in let () = Hashtbl.add sessions token (Session.make world client_app user) in {response_tmpl with output=(Some token)} |