(require 'erc)

(defun erc-geoip-JOIN (proc parsed)
  "doc..."
  (let ((nick (erc-extract-nick (erc-response.sender parsed))))
    (erc-display-message
     parsed 'notice proc
     (concat nick "Joined and I will add more message here later"))
    )
)

(define-erc-module geoip nil
  "doc..."
  ((add-hook 'erc-server-JOIN-functions 'erc-geoip-JOIN))
  ((remove-hook 'erc-server-JOIN-functions 'erc-geoip-JOIN))
)

(provide 'etc-geoip)