[Freehoo-users] Re: Freehoo!!!

[Anand Babu]

,----[ Mrugesh Karnik <address@hidden> ]
| Hi,
| 
| I downloaded the latest files from CVS and it compiled
| and installed without any problems :)
| 
| Also, I tried to customise the configuration file, but
| I think I need some help!!
| 
| Cheers and thanks once again :)
`----


;;; file ~/.freehoo/freehoo.scm: example freehoo startup file

;   this is comment
;;; sample freehoo.scm
;;; login-id is equal to my gnu/linux account
;; (fh-set-default-login-id! (array-ref (getpwuid (getuid)) 0))

;;; default login-id for yahoo service
(fh-set-default-login-id! "abindian")
;; (fh-set-default-login-id! "abindian")
;; (fh-set-default-login-id! "gnubot")
(fh-set-default-status! 12)

;;; if login-id is "abindian"
(and (string=? (fh-get-default-login-id) "abindian")
     ;;; default password
     (fh-set-default-password! "secret")
     ;;; login in invisible mode
     (fh-set-default-status! 12))

;;; create aliases
(define alias '((helpdesk . (abindian balugi kvisu2000))
                (mridul . (gnuindian))
                (bala . (balugi))
                (nags . (nagappanal))
                (visu . (kvisu2000))))



;; Turn off built in bell audio
(fh-toggle! "bell")

;; play music for every music received
(define (receive-beep from msg)
  "beep on receiving message"
  (system "ogg123 ~/music/receive-event.oggA&"))
(add-hook! fh-message-receive-hook receive-beep)

;; play music for every music sent
(define (send-beep from msg)
  "beep on send message"
  (system "ogg123 ~/music/send-event.oggA&"))
(add-hook! fh-message-send-hook send-beep)

-- 
Anand Babu
Free as in Freedom <www.gnu.org>