server/admin.c: Export `a_info'.

We shall have need of this soon.

diff --git a/server/admin.c b/server/admin.c
index 06922dbb18f0509d4525814a4e3b67e1ef3bba09..fcf27d3ef09acb11df75bf0a82d83bbc5f9007f0 100644 (file)
--- a/server/admin.c
+++ b/server/admin.c
@@ -374,7 +374,7 @@ static void a_write(admin *a, const char *status, const char *tag,
   va_end(ap);
 }
 
-/* --- @a_ok@, @a_info@, @a_fail@ --- *
+/* --- @a_ok@, @a_fail@ --- *
  *
  * Arguments:  @admin *a@ = connection
  *             @const char *fmt@ = format string
@@ -387,21 +387,32 @@ static void a_write(admin *a, const char *status, const char *tag,
 
 static void a_ok(admin *a) { a_write(a, "OK", 0, A_END); }
 
-static void a_info(admin *a, const char *fmt, ...)
+static void a_fail(admin *a, const char *fmt, ...)
 {
   va_list ap;
 
   va_start(ap, fmt);
-  a_vwrite(a, "INFO", 0, fmt, &ap);
+  a_vwrite(a, "FAIL", 0, fmt, &ap);
   va_end(ap);
 }
 
-static void a_fail(admin *a, const char *fmt, ...)
+/* --- @a_info@ --- *
+ *
+ * Arguments:  @admin *a@ = connection
+ *             @const char *fmt@ = format string
+ *             @...@ = other arguments
+ *
+ * Returns:    ---
+ *
+ * Use:                Report information to an admin client.
+ */
+
+void a_info(admin *a, const char *fmt, ...)
 {
   va_list ap;
 
   va_start(ap, fmt);
-  a_vwrite(a, "FAIL", 0, fmt, &ap);
+  a_vwrite(a, "INFO", 0, fmt, &ap);
   va_end(ap);
 }
 

diff --git a/server/tripe.h b/server/tripe.h
index cb892208b8e75ac96aa386aac481c97949604e79..4669711eeb3a80ff4cdbf4acbb91eaa16e9ad8c8 100644 (file)
--- a/server/tripe.h
+++ b/server/tripe.h
@@ -980,6 +980,19 @@ extern void a_vformat(dstr */*d*/, const char */*fmt*/, va_list */*ap*/);
 
 extern void EXECL_LIKE(0) a_format(dstr */*d*/, const char */*fmt*/, ...);
 
+/* --- @a_info@ --- *
+ *
+ * Arguments:  @admin *a@ = connection
+ *             @const char *fmt@ = format string
+ *             @...@ = other arguments
+ *
+ * Returns:    ---
+ *
+ * Use:                Report information to an admin client.
+ */
+
+extern void EXECL_LIKE(0) a_info(admin */*a*/, const char */*fmt*/, ...);
+
 /* --- @a_warn@ --- *
  *
  * Arguments:  @const char *fmt@ = pointer to format string