(define (tamere w)
(string-append w
", ta mère "
- (list-ref where (bot-random (length where))) " "
- (list-ref how (bot-random (length how)))))
+ (list-ref where (bot:random (length where))) " "
+ (list-ref how (bot:random (length how)))))
-(define (bot-tamere c w)
- (bot-say c (tamere w)))
+(define (bot:tamere c w)
+ (bot:say c (tamere w)))
-(bot-addcommand "tamere" bot-tamere #t 2 1)
+(bot:addcommand "tamere" bot:tamere #t 2 1)