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

Diff of /erbot/erbedit.el

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

revision 1.4 by deego, Fri Dec 17 05:13:27 2004 UTC revision 1.5 by deego, Fri Aug 12 00:36:17 2005 UTC
# Line 1  Line 1 
1  ;;; erbedit.el --- quicker operator editing of bots' bbdb  ;;; erbedit.el --- quicker operator editing of bots' bbdb
2  ;; Time-stamp: <2004-12-17 00:13:59 deego>  ;; Time-stamp: <2005-08-11 20:32:27 deego>
3  ;; Copyright (C) 2003 D. Goel  ;; Copyright (C) 2003 D. Goel
4  ;; Emacs Lisp Archive entry  ;; Emacs Lisp Archive entry
5  ;; Filename: erbedit.el  ;; Filename: erbedit.el
# Line 34  Line 34 
34    
35    
36    
37  ;; See also:  (defconst erbedit-version "0.0dev")
   
 (defconst erbedit-commentary  
   "This file permits mass-editing of the bbdb, to be used by the bot  
 operators.  
 ")  
   
 (defun erbedit-commentary ()  
   "Provides electric help from variable `erbedit-commentary'."  
   (interactive)  
   (with-electric-help  
    '(lambda () (insert erbedit-commentary) nil) "*doc*"))  
   
 ;;; History:  
   
 ;;; Bugs:  
   
 ;;; New features:  
 (defconst erbedit-new-features  
   "Help..."  
 )  
   
 (defun erbedit-new-features ()  
   "Provides electric help from variable `erbedit-new-features'."  
   (interactive)  
   (with-electric-help  
    '(lambda () (insert erbedit-new-features) nil) "*doc*"))  
   
 ;;; TO DO:  
 (defconst erbedit-todo  
   "Help..."  
 )  
   
 (defun erbedit-todo ()  
   "Provides electric help from variable `erbedit-todo'."  
   (interactive)  
   (with-electric-help  
    '(lambda () (insert erbedit-todo) nil) "*doc*"))  
   
 (defconst erbedit-version "0.0-DUMMY")  
 (defun erbedit-version (&optional arg)  
    "Display erbedit's version string.  
 With prefix ARG, insert version string into current buffer at point."  
   (interactive "P")  
   (if arg  
       (insert (message "erbedit version %s" erbedit-version))  
     (message "erbedit version %s" erbedit-version)))  
38    
39  ;;==========================================  ;;==========================================
40  ;;; Requires:  ;;; Requires:

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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