# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1251774860 0
# Node ID 603c369f665be0ae1f142b28e396ff4676dda602
# Parent  6558b4c12a5ab135359f1afdfb3a5c96a3a608bc
(nslookup): Use make-comint rather than comint-run.

diff -r 6558b4c12a5a -r 603c369f665b lisp/net/net-utils.el
--- a/lisp/net/net-utils.el	Tue Sep 01 03:07:11 2009 +0000
+++ b/lisp/net/net-utils.el	Tue Sep 01 03:14:20 2009 +0000
@@ -1,7 +1,7 @@
 ;;; net-utils.el --- network functions
 
-;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+;;   2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author:  Peter Breton <pbreton@cs.umb.edu>
 ;; Created: Sun Mar 16 1997
@@ -484,7 +484,7 @@
 (defun nslookup ()
   "Run nslookup program."
   (interactive)
-  (comint-run nslookup-program)
+  (switch-to-buffer (make-comint "nslookup" nslookup-program))
   (nslookup-mode))
 
 (defvar comint-prompt-regexp)