summaryrefslogtreecommitdiff
path: root/verifycert.erl
diff options
context:
space:
mode:
Diffstat (limited to 'verifycert.erl')
-rwxr-xr-xverifycert.erl10
1 files changed, 7 insertions, 3 deletions
diff --git a/verifycert.erl b/verifycert.erl
index a606d1c..b2d1e95 100755
--- a/verifycert.erl
+++ b/verifycert.erl
@@ -1,6 +1,10 @@
#!/usr/bin/env escript
%% -*- erlang -*-
+-define(CATLFISH_VER, "catlfish-0.9.0-dev").
+-define(PLOP_VER, "plop-0.9.0-dev").
+-define(LAGER_VER, "lager-2.1.1").
+
write_reply(Bin) ->
Length = size(Bin),
file:write(standard_io, <<Length:32, Bin/binary>>).
@@ -54,9 +58,9 @@ main([KnownRoots]) ->
[ScriptFile | _] = init:get_plain_arguments(),
BaseDir = filename:dirname(ScriptFile),
LibDirs = [BaseDir ++ "/../lib", "../lib"],
- add_lib(LibDirs, "catlfish-0.9.0-dev"),
- add_lib(LibDirs, "lager-2.1.1"),
- add_lib(LibDirs, "plop-0.9.0-dev"),
+ add_lib(LibDirs, ?CATLFISH_VER),
+ add_lib(LibDirs, ?LAGER_VER),
+ add_lib(LibDirs, ?PLOP_VER),
Certs = x509:read_pemfiles_from_dir(KnownRoots),
loop(Certs).