* mu-cmd-server: use mu_util_supports

This commit is contained in:
djcb 2012-10-18 12:25:46 +03:00
parent 1a0c6a6c7c
commit 6351a3906b
1 changed files with 6 additions and 8 deletions

View File

@ -1288,15 +1288,13 @@ cmd_ping (ServerContext *ctx, GSList *args, GError **err)
return print_and_clear_g_error (err);
print_expr ("(:pong \"" PACKAGE_NAME "\" "
" :props ("
#ifdef BUILD_CRYPTO
" :crypto t "
#endif /*BUILD_CRYPTO*/
#ifdef BUILD_GUILE
" :guile t "
#endif /*BUILD_GUILE*/
" :props (:crypto %s :guile %s "
" :version \"" VERSION "\" "
" :doccount %u))",doccount);
" :doccount %u))",
mu_util_supports (MU_FEATURE_CRYPTO) ? "t" : "nil",
mu_util_supports (MU_FEATURE_GUILE|MU_FEATURE_GNUPLOT)
? "t" : "nil",
doccount);
return MU_OK;
}