How do you get hold of --loglevel value from Scheme

[Ian Hulin]

Hi all,

Before the new loglevel option was introduced you had to do

(ly:get_option 'verbose) from scheme to check whether you wanted to
output extra stuff.  Now that --verbose is deprecated in favour of
--loglevel=DEBUG, what's the non-deprecated way of coding this when
it's _not_ just to output a message (where you can use ly:debug)? For
example

(if (ly:get_option 'verbose)
  (set %load-hook (lambda (filename)
                    (ly:message ( _ "\t[Loading ~a] ...\n") filename))))

I need a scheme equivalent to is_loglevel(DEBUG) in C++.

Cheers,

Ian