|
From: | Emanuel Berg |
Subject: | hijack C function, use it transparently with in-between layer |
Date: | Mon, 06 Jun 2016 05:28:04 +0200 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/24.4 (gnu/linux) |
The truth is down there! (defvar old-message) (fset 'old-message (symbol-function #'message)) (defun message (format-string &rest args) (unless (member format-string '( "It was just another system of control." "Mark set" )) (apply `(old-message ,format-string ,@args) ))) ;; test: ;; ;; (message "%s - %s" "1" "2") ;; (message "Break on thru to the other side.") ;; (message "It was just another system of control.") ;; (message "Mark set") -- underground experts united .... http://user.it.uu.se/~embe8573 Emacs Gnus Blogomatic ......... http://user.it.uu.se/~embe8573/blogomatic - so far: 48 Blogomatic articles -
[Prev in Thread] | Current Thread | [Next in Thread] |