Commit 6dc01f46 authored by Matthias Redies's avatar Matthias Redies

included git hash into usage data

parent 088e558e
......@@ -45,6 +45,7 @@ MODULE m_xmlOutput
SUBROUTINE startXMLOutput()
USE m_juDFT_args
USE m_juDFT_usage
USE m_constants
USE m_utility
USE m_compile_descr
......@@ -91,6 +92,7 @@ MODULE m_xmlOutput
CALL get_compile_desc(gitdesc,githash,gitbranch,compile_date,compile_user,compile_host,compile_flags,link_flags)
gitdescTemp = gitdesc
githashTemp = githash
CALL add_usage_data("githash", githash)
gitbranchTemp = gitbranch
compile_dateTemp = compile_date
compile_userTemp = compile_user
......
......@@ -8,8 +8,8 @@ MODULE m_judft_usage
PRIVATE
CHARACTER(LEN=99),PARAMETER:: URL_STRING="www.flapw.de/collect.pl"
INTEGER,PARAMETER :: MAX_NO_KEYS=20
CHARACTER(LEN=20) :: keys(MAX_NO_KEYS)
CHARACTER(LEN=20) :: values(MAX_NO_KEYS)
CHARACTER(LEN=200) :: keys(MAX_NO_KEYS)
CHARACTER(LEN=200) :: values(MAX_NO_KEYS)
INTEGER :: no_keys=0
INTERFACE add_usage_data
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment