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

Diff of /erbot/erball.el

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

revision 1.22 by deego, Sat Jan 1 04:37:30 2005 UTC revision 1.23 by deego, Wed Jan 5 19:16:47 2005 UTC
# Line 1  Line 1 
1  ;;; erball.el --- Functions on all files.  ;;; erball.el --- Functions on all files.
2  ;; Time-stamp: <2004-12-31 23:06:48 deego>  ;; Time-stamp: <2005-01-05 14:16:07 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 13  Line 13 
13  ;; not all of these may be required depending on how you use erbot..  ;; not all of these may be required depending on how you use erbot..
14  (require 'cl)  (require 'cl)
15    
16  (require 'doctor)  (defmacro erball-ignore-errors-loudly (&rest body)
17  (require 'erc)    "Like ignore-errors, but tells the error..
18  (require 'erc-stamp)  
19  (unless noninteractive (require 'dunnet))  Copied from deego's 'ignore-errors-my', which owes some of its work
20  (require 'erbot)  to: Kalle on 7/3/01:
21  (require 'erbcountry)   * used backquote: something i was too lazy to convert my macro to..
22  (require 'erbutils)   * removed the progn: condition-case automatically has one..
23  (require 'erblog)   * made sure that the return is nil.. just as it is in ignore-errors. "
24  (require 'erbeng)    (let ((err (gensym)))
25  (require 'erbdata)      `(condition-case ,err (progn ,@body)
26  (require 'erbkarma)         (error
27  (require 'erblisp)          (ding t)
28  (require 'erbc)          (ding t)
29  (require 'erbc2)          (ding t)
30  (require 'erbc3)          (message "IGNORED ERROR: %s" (error-message-string ,err))
31  (require 'erbc4)          (sit-for 1)
32  (require 'erbc5)          nil))))
33  (require 'erbc6)  
34  (require 'erbcspecial)  
35  (require 'erbbdb)  
36  (require 'erbforget)  (erball-ignore-errors-loudly (require 'doctor))
37  (require 'erbedit)  (erball-ignore-errors-loudly (require 'erc))
38  (require 'erbtrain)  (erball-ignore-errors-loudly (require 'erc-stamp))
39  (ignore-errors (require 'erbwiki))  (unless noninteractive (erball-ignore-errors-loudly (require 'dunnet)))
40  (require 'erbunlisp)  (erball-ignore-errors-loudly (require 'erbot))
41  (require 'erbcompat)  (erball-ignore-errors-loudly (require 'erbcountry))
42    (erball-ignore-errors-loudly (require 'erbutils))
43    (erball-ignore-errors-loudly (require 'erblog))
44  (ignore-errors  (erball-ignore-errors-loudly (require 'erbeng))
45    (require 'erbmsg))  (erball-ignore-errors-loudly (require 'erbdata))
46    (erball-ignore-errors-loudly (require 'erbkarma))
47  (ignore-errors (require 'flame))  (erball-ignore-errors-loudly (require 'erblisp))
48    (erball-ignore-errors-loudly (require 'erbc))
49  (ignore-errors (require 'mkback))  (erball-ignore-errors-loudly (require 'erbc2))
50  (ignore-errors (require 'lines))  (erball-ignore-errors-loudly (require 'erbc3))
51  (ignore-errors (require 'google))  (erball-ignore-errors-loudly (require 'erbc4))
52  (ignore-errors (require 'oct))  (erball-ignore-errors-loudly (require 'erbc5))
53    (erball-ignore-errors-loudly (require 'erbc6))
54    (erball-ignore-errors-loudly (require 'erbcspecial))
55    (erball-ignore-errors-loudly (require 'erbbdb))
56    (erball-ignore-errors-loudly (require 'erbforget))
57    (erball-ignore-errors-loudly (require 'erbedit))
58    (erball-ignore-errors-loudly (require 'erbtrain))
59    (erball-ignore-errors-loudly (require 'erbwiki))
60    (erball-ignore-errors-loudly (require 'erbunlisp))
61    (erball-ignore-errors-loudly (require 'erbcompat))
62    
63    (erball-ignore-errors-loudly (require 'erbmsg))
64    
65    (erball-ignore-errors-loudly (require 'flame))
66    
67    (erball-ignore-errors-loudly (require 'mkback))
68    (erball-ignore-errors-loudly (require 'lines))
69    (erball-ignore-errors-loudly (require 'google))
70    (erball-ignore-errors-loudly (require 'oct))
71    
72  ;; the rest of the commands here are useful to the author when editing erbot.  ;; the rest of the commands here are useful to the author when editing erbot.
73    

Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23

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