[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/net-utils.el, v [EMACS_22_BASE]
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/net-utils.el, v [EMACS_22_BASE] |
Date: |
Tue, 26 Feb 2008 11:55:42 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Branch: EMACS_22_BASE
Changes by: Juanma Barranquero <lektu> 08/02/26 11:55:41
Index: net-utils.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/net-utils.el,v
retrieving revision 1.25.2.4
retrieving revision 1.25.2.5
diff -u -b -r1.25.2.4 -r1.25.2.5
--- net-utils.el 9 Feb 2008 01:32:30 -0000 1.25.2.4
+++ net-utils.el 26 Feb 2008 11:55:41 -0000 1.25.2.5
@@ -107,7 +107,7 @@
(list
(if (eq system-type 'windows-nt)
"/all" "-a"))
- "Options for `ifconfig-program'."
+ "Options for the ifconfig program."
:group 'net-utils
:type '(repeat string))
@@ -121,7 +121,7 @@
(defcustom netstat-program-options
(list "-a")
- "Options for netstat-program."
+ "Options for the netstat program."
:group 'net-utils
:type '(repeat string))
@@ -132,7 +132,7 @@
(defcustom arp-program-options
(list "-a")
- "Options for arp-program."
+ "Options for the arp program."
:group 'net-utils
:type '(repeat string))
@@ -148,7 +148,7 @@
(if (eq system-type 'windows-nt)
(list "print")
(list "-r"))
- "Options for route-program."
+ "Options for the route program."
:group 'net-utils
:type '(repeat string))
@@ -158,7 +158,7 @@
:type 'string)
(defcustom nslookup-program-options nil
- "List of options to pass to the nslookup program."
+ "Options for the nslookup program."
:group 'net-utils
:type '(repeat string))
@@ -176,12 +176,12 @@
:type 'string)
(defcustom ftp-program "ftp"
- "Progam to run to do FTP transfers."
+ "Program to run to do FTP transfers."
:group 'net-utils
:type 'string)
(defcustom ftp-program-options nil
- "List of options to pass to the FTP program."
+ "Options for the ftp program."
:group 'net-utils
:type '(repeat string))
@@ -199,7 +199,7 @@
:type 'string)
(defcustom smbclient-program-options nil
- "List of options to pass to the smbclient program."
+ "Options for the smbclient program."
:group 'net-utils
:type '(repeat string))
@@ -214,14 +214,12 @@
(defcustom dns-lookup-program "host"
"Program to interactively query DNS information."
:group 'net-utils
- :type 'string
- )
+ :type 'string)
(defcustom dns-lookup-program-options nil
- "List of options to pass to the dns-lookup program."
+ "Options for the dns-lookup program."
:group 'net-utils
- :type '(repeat string)
- )
+ :type '(repeat string))
;; Internal variables
(defvar network-connection-service nil)
@@ -382,7 +380,7 @@
;;;###autoload
(defun arp ()
- "Run the arp program."
+ "Run arp program."
(interactive)
(net-utils-run-program
"Arp"
@@ -392,7 +390,7 @@
;;;###autoload
(defun route ()
- "Run the route program."
+ "Run route program."
(interactive)
(net-utils-run-program
"Route"
@@ -462,8 +460,7 @@
(list "DNS Lookup" host dns-lookup-program)
" ** "))
dns-lookup-program
- options
- )))
+ options)))
;;;###autoload
(defun run-dig (host)