]> git.eshelyaron.com Git - emacs.git/commitdiff
(browse-url-netscape, browse-url-netscape-sentinel)
authorRichard M. Stallman <rms@gnu.org>
Tue, 27 May 1997 17:06:24 +0000 (17:06 +0000)
committerRichard M. Stallman <rms@gnu.org>
Tue, 27 May 1997 17:06:24 +0000 (17:06 +0000)
(browse-url-netscape-send): Use browse-url-netscape-program,
renamed from browse-url-netscape-command.

lisp/browse-url.el

index c4291f6a308f56533f28a581cb3d47b8ffe03aff..5dce2608674c7ec7a4ee9ca94e67a6465d735d66 100644 (file)
@@ -601,7 +601,7 @@ used instead of browse-url-new-window-p."
   (let* ((process-environment (browse-url-process-environment))
          (process (apply 'start-process
                        (concat "netscape " url) nil
-                       browse-url-netscape-command
+                       browse-url-netscape-program
                (append browse-url-netscape-arguments
                        (if new-window '("-noraise"))
                        (list "-remote" 
@@ -619,7 +619,7 @@ used instead of browse-url-new-window-p."
        ;; Netscape not running - start it
            (message "Starting Netscape...")
        (apply 'start-process (concat "netscape" url) nil
-              browse-url-netscape-command
+              browse-url-netscape-program
               (append browse-url-netscape-startup-arguments (list url))))))
 
 (defun browse-url-netscape-reload ()
@@ -631,7 +631,7 @@ used instead of browse-url-new-window-p."
   "Send a remote control command to Netscape."
   (let* ((process-environment (browse-url-process-environment)))
     (apply 'start-process "netscape" nil
-           browse-url-netscape-command
+           browse-url-netscape-program
          (append browse-url-netscape-arguments
                    (list "-remote" command)))))