/[erbot]/erbot/erbc.el
ViewVC logotype

Diff of /erbot/erbc.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.100 by deego, Fri Apr 1 18:16:00 2005 UTC revision 1.101 by deego, Wed Apr 6 16:49:49 2005 UTC
# Line 1  Line 1 
1  ;;; erbc.el --- Erbot user-interface commands.  ;;; erbc.el --- Erbot user-interface commands.
2  ;; Time-stamp: <2005-04-01 13:14:13 deego>  ;; Time-stamp: <2005-04-06 12:48:22 deego>
3  ;; Copyright (C) 2002 D. Goel  ;; Copyright (C) 2002 D. Goel
4  ;; Emacs Lisp Archive entry  ;; Emacs Lisp Archive entry
5  ;; Filename: erbc.el  ;; Filename: erbc.el
# Line 4157  last time i checked , equalp seemed to w Line 4157  last time i checked , equalp seemed to w
4157      (if addp (setq ct (concat "." ct))))      (if addp (setq ct (concat "." ct))))
4158    (erbcountry (downcase ct)))    (erbcountry (downcase ct)))
4159    
4160    
4161    
4162    (defun fsi-country-search (&rest names)
4163      (unless names (error
4164                  (format "Syntax: %s country-search NM (example , country japa)" erbn-char)))
4165      (erbcountry-search
4166       (mapconcat (lambda (arg) (format "%s" arg)) names " ")))
4167    
4168    
4169  ;;; 2003-02-09 T13:40:04-0500 (Sunday)    D. Goel  ;;; 2003-02-09 T13:40:04-0500 (Sunday)    D. Goel
4170  (defun fsi-spook (&rest args)  (defun fsi-spook (&rest args)
4171    (with-temp-buffer    (with-temp-buffer

Legend:
Removed from v.1.100  
changed lines
  Added in v.1.101

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26