+(require 'riece-mcat)
+
(defconst riece-addon-modules
- '((riece-alias . "Define aliases for IRC names.")
- (riece-async . "Connect to IRC server via async proxy.")
- (riece-biff . "Be notified if messages arrives.")
- (riece-button . "Display useful buttons in IRC buffers.")
- (riece-ctcp . "CTCP (Client To Client Protocol) support.")
- (riece-ctlseq . "Mark up control sequences in IRC buffers.")
- (riece-doctor . "Pretend to be a psychotherapist.")
- (riece-epg . "Encrypt/decrypt messages.")
- (riece-eval-ruby . "Evaluate input string as a Ruby program.")
- (riece-eval . "Evaluate an input string as an elisp form.")
- (riece-foolproof . "Prevent miss-operation in the command buffer.")
- (riece-google . "Search keywords by Google.")
- (riece-guess . "Guess the next channel, using multiple methods.")
- (riece-hangman . "Allow channel members to play the hangman game.")
- (riece-highlight . "Highlight IRC buffers.")
- (riece-history . "Manage history of channel shifting.")
- (riece-icon . "Display icons in IRC buffers.")
- (riece-ignore . "Ignore messages from some users.")
- (riece-kakasi . "Convert Japanese to roman string by KAKASI.")
- (riece-keepalive . "Keep an IRC connection.")
- (riece-keyword . "Detect keywords in IRC buffers.")
- (riece-log . "Save IRC logs.")
- (riece-lsdb . "Help register nicknames in LSDB rolodex program.")
- (riece-mcat . "Translate messages.")
- (riece-menu . "Setup Riece's command menus.")
- (riece-mini . "Use Riece only on the minibuffer.")
- ;;(riece-ndcc . "DCC file sending protocol support (written in elisp.)")
- (riece-rdcc . "DCC file sending protocol support (written in Ruby.)")
- (riece-shrink-buffer . "Free old IRC messages to save memory usage.")
- (riece-skk-kakutei . "Remove SKK's preedit mark before sending messages.")
- (riece-toolbar . "Display toolbar icons.")
- (riece-twitter . "Send your status to Twitter.")
- (riece-unread . "Mark channels where new messages arrived.")
- (riece-url . "Collect URL in IRC buffers.")
- (riece-xface . "Display X-Face in IRC buffers.")
- (riece-xfaceb . "Display X-Face & Colour Face images in IRC buffers \(BBDB\).")
- (riece-yank . "Enter the element of kill-ring.")))
+ (list
+ (cons 'riece-alias
+ (riece-mcat "Define aliases for IRC names."))
+ (cons 'riece-async
+ (riece-mcat "Connect to IRC server via async proxy."))
+ (cons 'riece-biff
+ (riece-mcat "Be notified if messages arrives."))
+ (cons 'riece-button
+ (riece-mcat "Display useful buttons in IRC buffers."))
+ (cons 'riece-ctcp
+ (riece-mcat "CTCP (Client To Client Protocol) support."))
+ (cons 'riece-ctlseq
+ (riece-mcat "Mark up control sequences in IRC buffers."))
+ (cons 'riece-doctor
+ (riece-mcat "Pretend to be a psychotherapist."))
+ (cons 'riece-epg
+ (riece-mcat "Encrypt/decrypt messages."))
+ (cons 'riece-eval-ruby
+ (riece-mcat "Evaluate input string as a Ruby program."))
+ (cons 'riece-eval
+ (riece-mcat "Evaluate an input string as an elisp form."))
+ (cons 'riece-foolproof
+ (riece-mcat "Prevent miss-operation in the command buffer."))
+ (cons 'riece-google
+ (riece-mcat "Search keywords by Google."))
+ (cons 'riece-guess
+ (riece-mcat "Guess the next channel, using multiple methods."))
+ (cons 'riece-hangman
+ (riece-mcat "Allow channel members to play the hangman game."))
+ (cons 'riece-highlight
+ (riece-mcat "Highlight IRC buffers."))
+ (cons 'riece-history
+ (riece-mcat "Manage history of channel shifting."))
+ (cons 'riece-icon
+ (riece-mcat "Display icons in IRC buffers."))
+ (cons 'riece-ignore
+ (riece-mcat "Ignore messages from some users."))
+ (cons 'riece-kakasi
+ (riece-mcat "Convert Japanese to roman string by KAKASI."))
+ (cons 'riece-keepalive
+ (riece-mcat "Keep an IRC connection."))
+ (cons 'riece-keyword
+ (riece-mcat "Detect keywords in IRC buffers."))
+ (cons 'riece-log
+ (riece-mcat "Save IRC logs."))
+ (cons 'riece-lsdb
+ (riece-mcat "Help register nicknames in LSDB rolodex program."))
+ (cons 'riece-mcat
+ (riece-mcat "Translate messages."))
+ (cons 'riece-menu
+ (riece-mcat "Setup Riece's command menus."))
+ (cons 'riece-mini
+ (riece-mcat "Use Riece only on the minibuffer."))
+;;; (cons 'riece-ndcc
+;;; (riece-mcat "DCC file sending protocol support (written in elisp.)"))
+ (cons 'riece-rdcc
+ (riece-mcat "DCC file sending protocol support (written in Ruby.)"))
+ (cons 'riece-shrink-buffer
+ (riece-mcat "Free old IRC messages to save memory usage."))
+ (cons 'riece-skk-kakutei
+ (riece-mcat "Remove SKK's preedit mark before sending messages."))
+ (cons 'riece-toolbar
+ (riece-mcat "Display toolbar icons."))
+ (cons 'riece-twitter
+ (riece-mcat "Send your status to Twitter."))
+ (cons 'riece-unread
+ (riece-mcat "Mark channels where new messages arrived."))
+ (cons 'riece-url
+ (riece-mcat "Collect URL in IRC buffers."))
+ (cons 'riece-xface
+ (riece-mcat "Display X-Face in IRC buffers."))
+ (cons 'riece-xfaceb
+ (riece-mcat "Display X-Face & Colour Face images in IRC buffers \(BBDB\)."))
+ (cons 'riece-yank
+ (riece-mcat "Enter the element of kill-ring."))))
(provide 'riece-addon-modules)
\ No newline at end of file
("Add-on %S is uninstalled" . "\e$B%"%I%*%s\e(B %S \e$B$,=|30$5$l$^$7$?\e(B")
("Add-on %S is unloaded" . "\e$B%"%I%*%s\e(B %S \e$B$,%"%s%m!<%I$5$l$^$7$?\e(B")
("Add-on: " . "\e$B%"%I%*%s\e(B: ")
+ ("Allow channel members to play the hangman game." . "\e$B%A%c%s%M%k$N;22C<T$,%O%s%0%^%s$GM7$Y$k$h$&$K$J$j$^$9\e(B")
("Already registered" . "\e$BEPO?:Q$_$G$9\e(B")
("Away message: " . "\e$BN%@J$N%a%C%;!<%8\e(B: ")
("Ban pattern: " . "\e$BN)F~6X;_%Q%?!<%s\e(B: ")
+ ("Be notified if messages arrives." . "\e$B%a%C%;!<%8$,FO$/$HDLCN$5$l$^$9\e(B")
("Beginning of buffer" . "\e$B%P%C%U%!$N@hF,$G$9\e(B")
+ ("CTCP (Client To Client Protocol) support." . "CTCP (Client To Client Protocol) \e$BBP1~\e(B")
("CTCP CLIENTINFO for %s (%s) = %s" . "%s (%s) \e$B$N\e(B CTCP CLIENTINFO = %s")
("CTCP CLIENTINFO from %s (%s) to %s" . "%s (%s) \e$B$,\e(B %s \e$B$K\e(B CTCP CLIENTINFO")
("CTCP PING for %s (%s) = %d sec" . "%s (%s) \e$B$N\e(B CTCP PING = %d \e$BIC\e(B")
("Channels" . "\e$B%A%c%s%M%k0lMw\e(B")
("Close Server" . "\e$B%5!<%P$H$N@\B3$rJD$8$k\e(B")
("Close server: " . "\e$B@\B3$rJD$8$k%5!<%P\e(B: ")
+ ("Collect URL in IRC buffers." . "\e$B%P%C%U%!$K=P$F$-$?\e(B URL \e$B$r=8$a$^$9\e(B")
("Command to execute on \"%s\":" . "\"%s\" \e$B$G<B9T$9$k%3%^%s%I\e(B: ")
+ ("Connect to IRC server via async proxy." . "\e$B@\B3@Z$l$rKI$0$?$a$K30It$N%W%m%;%9\e(B (aproxy.rb) \e$B$r2p$7$F\e(B IRC \e$B%5!<%P$K@\B3$7$^$9\e(B")
("Connecting to %s..." . "%s \e$B$K@\B3$7$F$$$^$9\e(B...")
("Connecting to %s...done" . "%s \e$B$K@\B3$7$F$$$^$9\e(B...\e$B40N;\e(B")
("Connecting to %s...failed: %S" . "%s \e$B$K@\B3$7$F$$$^$9\e(B...\e$B<:GT\e(B: %S")
("Connecting to IRC server..." . "IRC \e$B%5!<%P$K@\B3$7$F$$$^$9\e(B...")
("Connecting to IRC server...done" . "IRC \e$B%5!<%P$K@\B3$7$F$$$^$9\e(B...\e$B40N;\e(B")
("Connecting to IRC server...failed: %S" . "IRC \e$B%5!<%P$K@\B3$7$F$$$^$9\e(B...\e$B<:GT\e(B: %S")
+ ("Convert Japanese to roman string by KAKASI." . "KAKASI \e$B$rMQ$$$FF|K\8l$r%m!<%^;z$KJQ49$7$^$9\e(B")
("Created on %s\n" . "%s \e$B$K:n@.$5$l$^$7$?\e(B\n")
+ ("DCC file sending protocol support (written in Ruby.)" . "DCC \e$B%U%!%$%kE>Aw\e(B (Ruby \e$B$K$h$k<BAu\e(B)")
+ ("Define aliases for IRC names." . "\e$B%K%C%/%M!<%`$d%A%c%s%M%kL>$NJLL>Dj5A\e(B")
+ ("Detect keywords in IRC buffers." . "\e$B%P%C%U%!$K=P$F$-$?%-!<%o!<%I$N8!=P\e(B")
("Display Channel Buffer" . "\e$B%A%c%s%M%k%P%C%U%!$NI=<(\e(B")
("Display Channel List Buffer" . "\e$B%A%c%s%M%k0lMw%P%C%U%!$NI=<(\e(B")
("Display User List Buffer" . "\e$B%f!<%60lMw%P%C%U%!$NI=<(\e(B")
+ ("Display X-Face & Colour Face images in IRC buffers (BBDB)." . "X-Face \e$B$d?'IU$-$N\e(B Face \e$B2hA|$rI=<(\e(B (BBDB \e$BMxMQ\e(B)")
+ ("Display X-Face in IRC buffers." . "X-Face \e$B$d?'IU$-\e(B Face \e$B2hA|$rI=<(\e(B (LSDB \e$BMxMQ\e(B)")
+ ("Display icons in IRC buffers." . "\e$B%"%$%3%s$rI=<(\e(B")
+ ("Display toolbar icons." . "\e$B%D!<%k%P!<$N%"%$%3%s$rI=<(\e(B")
+ ("Display useful buttons in IRC buffers." . "\e$B%\%?%s$rI=<(\e(B")
+ ("Encrypt/decrypt messages." . "\e$B%a%C%;!<%8$N0E9f2=!&I|9f\e(B")
("End of buffer" . "\e$B%P%C%U%!$N=*C<$G$9\e(B")
+ ("Enter the element of kill-ring." . "kill-ring \e$B$+$i0l9TH/8@\e(B")
("Erroneous nickname \"%s\". Choose a new one: " . "\e$BIT@5$J%K%C%/%M!<%`\e(B \"%s\"\e$B!#?7$7$$%K%C%/%M!<%`\e(B: ")
+ ("Evaluate an input string as an elisp form." . "\e$BF~NO9T$r\e(B Elisp \e$B$N<0$H$7$FI>2A\e(B")
+ ("Evaluate input string as a Ruby program." . "\e$BF~NO9T$r\e(B Ruby \e$B$N<0$H$7$FI>2A\e(B")
("File: " . "\e$B%U%!%$%k\e(B: ")
("Finger user: " . "\e$B?H85$rD4$Y$k%f!<%6\e(B: ")
+ ("Free old IRC messages to save memory usage." . "\e$B8E$$%a%C%;!<%8$r>C5n$7$F%a%b%j>CHq$r8:$i$9\e(B")
("Freeze Channel Buffer" . "\e$B%A%c%s%M%k%P%C%U%!$N%U%j!<%:\e(B")
("Freeze Channel Buffer Until Next Message" . "\e$B%a%C%;!<%8$,Mh$k$^$G%A%c%s%M%k%P%C%U%!$r%U%j!<%:\e(B")
+ ("Guess the next channel, using multiple methods." . "\e$BJ#?t$NJ}K!$G0\F0@h$N%A%c%s%M%k$rM=B,\e(B")
+ ("Help register nicknames in LSDB rolodex program." . "LSDB \e$B=;=jO?$K%K%C%/%M!<%`$rEPO?\e(B")
+ ("Highlight IRC buffers." . "\e$B%P%C%U%!$N?'IU$1\e(B")
+ ("Ignore messages from some users." . "\e$B;XDj$7$?%f!<%6$+$i$N%a%C%;!<%8$rL5;k\e(B")
("Invite User" . "\e$B%f!<%6$r>7BT$9$k\e(B")
("Invite user: " . "\e$B>7BT$9$k%f!<%6\e(B: ")
("Inviting %s\n" . "%s \e$B$r>7BT$7$F$$$^$9\e(B\n")
("Join Channel" . "\e$B%A%c%s%M%k$K;22C$9$k\e(B")
("Join channel/user (default %s): " . "\e$B;22C$9$k%A%c%s%M%k$^$?$O%f!<%6\e(B (\e$B4{DjCM\e(B %s): ")
("Join channel/user: " . "\e$B;22C$9$k%A%c%s%M%k$^$?$O%f!<%6\e(B: ")
+ ("Keep an IRC connection." . "\e$B@\B3$r0];}\e(B")
("Key for %s: " . "%s \e$B$N%-!<\e(B: ")
("Key for %s: Quit" . "%s \e$B$N%-!<\e(B: \e$BCf;_\e(B")
("Kick User" . "\e$B%f!<%6$r=3$j=P$9\e(B")
("Logging in to IRC server..." . "IRC \e$B%5!<%P$K%m%0%$%s$7$F$$$^$9\e(B...")
("Logging in to IRC server...done" . "IRC \e$B%5!<%P$K%m%0%$%s$7$F$$$^$9\e(B...\e$B40N;\e(B")
("Manage Add-ons" . "\e$B%"%I%*%s$N4IM}\e(B")
+ ("Manage history of channel shifting." . "\e$B%A%c%s%M%k0\F0$NMzNr\e(B")
("Mark As Away" . "\e$BN%@J>uBV$K$9$k\e(B")
+ ("Mark channels where new messages arrived." . "\e$B?7$7$$%a%C%;!<%8$,FO$$$?%A%c%s%M%k$r%^!<%/\e(B")
+ ("Mark up control sequences in IRC buffers." . "\e$B%3%s%H%m!<%k%7!<%1%s%9$K$h$k?'IU$1\e(B")
("Message to user: " . "\e$B%f!<%6$X$N%a%C%;!<%8\e(B: ")
("Message: " . "\e$B%a%C%;!<%8\e(B")
("Mode (? for help)" . "\e$B%b!<%I\e(B (\e$B%X%k%W$O\e(B ?)")
("Password incorrect from %s." . "%s \e$B$N%Q%9%o!<%I$,IT@5$G$9!#\e(B")
("Password: " . "\e$B%Q%9%o!<%I\e(B: ")
("Password: Quit" . "\e$B%Q%9%o!<%I\e(B: \e$BCf;_\e(B")
+ ("Pretend to be a psychotherapist." . "\e$B?4M}NEK!;N$K$J$j$9$^$9\e(B")
+ ("Prevent miss-operation in the command buffer." . "\e$B%3%^%s%I%P%C%U%!$G$N8mA`:n$rKI$0\e(B")
("Previous Channel" . "\e$BA0$N%A%c%s%M%k\e(B")
("Quit IRC" . "IRC \e$B$r$d$a$k\e(B")
("Really quit IRC? " . "\e$BK\Ev$K\e(B IRC \e$B$r$d$a$^$9$+\e(B? ")
("Recent messages of the day:\n" . "\e$B:G6a$N%a%C%;!<%8\e(B (\e$B:#F|Cf\e(B):\n")
("Recent messages up to %d lines:\n" . "\e$B:G6a$N%a%C%;!<%8\e(B (%d \e$B9T$^$G\e(B):\n")
("Redraw Layout" . "\e$B2hLL$N:FIA2h\e(B")
+ ("Remove SKK's preedit mark before sending messages." . "SKK \e$B$NJQ49A0J8;zNs$rAw$i$J$$$h$&$K$9$k\e(B")
+ ("Save IRC logs." . "\e$B%m%0$rJ]B8\e(B")
("Save as (default %s) " . "\e$BJ]B8@h\e(B (\e$B4{DjCM\e(B %s) ")
("Saving %s..." . "%s \e$B$rJ]B8$7$F$$$^$9\e(B...")
("Saving %s...done" . "%s \e$B$rJ]B8$7$F$$$^$9\e(B...\e$B40N;\e(B")
+ ("Search keywords by Google." . "\e$B%-!<%o!<%I$r\e(B Google \e$B$G8!:w\e(B")
+ ("Send your status to Twitter." . "Twitter \e$B$K%9%F!<%?%9>pJs$rAw$k\e(B")
("Sending %s...(%s/%d)" . "%s \e$B$rAw?.Cf\e(B...(%s/%d)")
("Sending %s...done" . "%s \e$B$rAw?.Cf\e(B...\e$B40N;\e(B")
("Sending QUIT to \"%s\"..." . "\"%s\" \e$B$K\e(B QUIT \e$B$rAw?.$7$F$$$^$9\e(B...")
("Set +v for users" . "+v \e$B$9$k%f!<%6\e(B")
("Set Channel Topic" . "\e$B%A%c%s%M%k$N%H%T%C%/\e(B")
("Set topic: " . "\e$B?7$7$$%H%T%C%/\e(B: ")
+ ("Setup Riece's command menus." . "\e$B%a%K%e!<%P!<$NMxMQ\e(B")
("Submit Bug Report" . "\e$B%P%0$rJs9p\e(B")
("Switch To Channel" . "\e$B%A%c%s%M%k$r0\F0\e(B")
("Switch to channel/user: " . "\e$B0\F0@h$N%A%c%s%M%k$^$?$O%f!<%6\e(B: ")
("Topic for %s: %s" . "%s \e$B$N%H%T%C%/\e(B: ")
("Topic on %s by %s: %s" . "%s \e$B$N%H%T%C%/$,\e(B %s \e$B$K$h$j@_Dj$5$l$^$7$?\e(B: %s")
("Topic: " . "\e$B%H%T%C%/\e(B: ")
+ ("Translate messages." . "\e$B%a%C%;!<%8$NK]Lu\e(B")
("Type \\[describe-mode] for help" . "\e$B%X%k%W$r8+$k$K$O\e(B \\[describe-mode]")
("Type \\[riece-command-dcc-receive] to receive" . "\e$B<u?.$9$k$K$O\e(B \\[riece-command-dcc-receive]")
("Type \\[riece-command-join] to join the channel" . "\e$B%A%c%s%M%k$K;22C$9$k$K$O\e(B \\[riece-command-join]")
("Unset +o for users" . "-o \e$B$9$k%f!<%6\e(B")
("Unset +v for users" . "-v \e$B$9$k%f!<%6\e(B")
+ ("Use Riece only on the minibuffer." . "\e$B%_%K%P%C%U%!$@$1$G\e(B Riece \e$B$r;H$&\e(B")
("User: " . "\e$B%f!<%6\e(B: ")
("Version" . "\e$B%P!<%8%g%s\e(B")
("WHO pattern: " . "WHO \e$B$N%Q%?!<%s\e(B: ")
projects / elisp / riece.git / commitdiff