X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgnus-fun.el;h=f33eb910c6a7816135fb6447c9a1e594ca724ad0;hp=1cd5ce5bb1e9e8d521a51cde910d7c5d99061eaf;hb=992509a3574f9add376cc480db9bb5656285bd5b;hpb=c54845f946c28e8361dc77fb09a873d72b69f967

diff --git a/lisp/gnus-fun.el b/lisp/gnus-fun.el
index 1cd5ce5bb..f33eb910c 100644
--- a/lisp/gnus-fun.el
+++ b/lisp/gnus-fun.el
@@ -85,13 +85,6 @@ PNG format."
     (call-process shell-file-name nil (list standard-output nil)
 		  nil shell-command-switch command)))
 
-(defun gnus-shell-command-on-region (start end command)
-  "A simplified `shell-command-on-region'.
-Output to the current buffer, replace text, and don't mingle error."
-  (call-process-region start end shell-file-name t
-		       (list (current-buffer) nil)
-		       nil shell-command-switch command))
-
 ;;;###autoload
 (defun gnus-random-x-face ()
   "Return X-Face header data chosen randomly from `gnus-x-face-directory'."