Mercurial > ~mikael > mcabber > hg

diff mcabber/src/commands.c @ 867:7f056c566569

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Commands /alias & /bind list the key bindings and aliases
author Mikael Berthe <mikael@lilotux.net>
date Wed, 24 May 2006 23:30:31 +0200
parents b30df2ab457f
children cefdaeb42e67
line wrap: on
line diff
--- a/mcabber/src/commands.c	Wed May 24 22:29:05 2006 +0200
+++ b/mcabber/src/commands.c	Wed May 24 23:30:31 2006 +0200
@@ -1300,6 +1300,11 @@
   g_free(option_utf8);
 }
 
+static void dump_alias(void *param, char *k, char *v)
+{
+  scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "Alias %s = %s", k, v);
+}
+
 static void do_alias(char *arg)
 {
   guint assign;
@@ -1307,7 +1312,7 @@
 
   assign = parse_assigment(arg, &alias, &value);
   if (!alias) {
-    scr_LogPrint(LPRINT_NORMAL, "Alias what?");
+    settings_foreach(SETTINGS_TYPE_ALIAS, &dump_alias, NULL);
     return;
   }
   if (!assign) {
@@ -1346,6 +1351,11 @@
   }
 }
 
+static void dump_bind(void *param, char *k, char *v)
+{
+  scr_LogPrint(LPRINT_NORMAL, "Key %4s is bound to: %s", k, v);
+}
+
 static void do_bind(char *arg)
 {
   guint assign;
@@ -1353,7 +1363,7 @@
 
   assign = parse_assigment(arg, &keycode, &value);
   if (!keycode) {
-    scr_LogPrint(LPRINT_NORMAL, "Bind what keycode?");
+    settings_foreach(SETTINGS_TYPE_BINDING, &dump_bind, NULL);
     return;
   }
   if (!assign) {