From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/5410
Path: main.gmane.org!not-for-mail
From: Mark Borges <mdb@cdc.noaa.gov>
Newsgroups: gmane.emacs.gnus.general
Subject: [browse-url v0.26 PATCH]
Date: Fri, 1 Mar 1996 10:57:48 -0700
Organization: CIRES, University of Colorado
Message-ID: <9603011757.AA15798@suomi.cdc.noaa.gov>
NNTP-Posting-Host: coloc-standby.netfonds.no
X-Trace: main.gmane.org 1035146017 32711 80.91.224.250 (20 Oct 2002 20:33:37 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 20:33:37 +0000 (UTC)
Cc: Ding Gnus List <ding@ifi.uio.no>
Return-Path: ding-request@ifi.uio.no
Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.7.3/8.6.9) with SMTP id KAA19887 for <steve@miranova.com>; Fri, 1 Mar 1996 10:47:32 -0800
Original-Received: from cdc.noaa.gov (manager.Colorado.EDU [128.138.218.210]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) 
	id <SAA02354@ifi.uio.no> for <ding@ifi.uio.no> ; Fri, 1 Mar 1996 18:58:05 +0100
Original-Received: from suomi by cdc.noaa.gov (SMI-8.6/SMI-SVR4)
	id KAA13007; Fri, 1 Mar 1996 10:57:48 -0700
Original-Received: by suomi (5.0) id AA15798; Fri, 1 Mar 1996 10:57:48 -0700
Original-To: Denis Howe <dbh@doc.ic.ac.uk>
X-Attribution: mb
Xref: main.gmane.org gmane.emacs.gnus.general:5410
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:5410


browse-url, version

;; Maintainer: Denis Howe <dbh@doc.ic.ac.uk>
;; Created: 03 Apr 1995
;; Version: 0.26 13 Jan 1996
;; Keywords: hypertext
;; X-Home page: http://wombat.doc.ic.ac.uk/

will fire up a new netscape even if one is currently running if
`browse-url-netscape-command' is not "netscape". 

I think the following patch is correct (it works for me using XEmacs),
but someone with GNU Emacs 19 should probably verify that it works
there as well.

  -mb-

*** browse-url.el.orig	Fri Mar  1 10:46:07 1996
--- browse-url.el	Fri Mar  1 10:48:10 1996
***************
*** 526,532 ****
  		       (list (not (eq (null browse-url-new-window-p)
  				      (null current-prefix-arg))))))
    (or (zerop
!        (apply 'call-process "netscape" nil nil nil
  	      (append browse-url-netscape-arguments
  		      (if new-window '("-noraise"))
  		      (list "-remote" 
--- 526,532 ----
  		       (list (not (eq (null browse-url-new-window-p)
  				      (null current-prefix-arg))))))
    (or (zerop
!        (apply 'call-process browse-url-netscape-command nil nil nil
  	      (append browse-url-netscape-arguments
  		      (if new-window '("-noraise"))
  		      (list "-remote"