;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
;;; Commentary:
(require 'riece-display)
(require 'riece-lsdb)
-(defvar riece-xface-enabled nil)
-
(defconst riece-xface-description
"Display X-Face in IRC buffers.")
(defvar lsdb-insert-x-face-function)
(defun riece-xface-update-user-list-buffer ()
- (if riece-xface-enabled
+ (if (get 'riece-xface 'riece-addon-enabled)
(riece-scan-property-region
'riece-identity (point-min)(point-max)
(lambda (start end)
'riece-xface-user-list-mode-hook))
(defun riece-xface-enable ()
- (setq riece-xface-enabled t)
(if riece-current-channel
(riece-emit-signal 'user-list-changed riece-current-channel)))
(defun riece-xface-disable ()
- (setq riece-xface-enabled nil)
(if riece-current-channel
(riece-emit-signal 'user-list-changed riece-current-channel)))