procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

net-utils system-type trivia.

Browse source 
* lisp/net/net-utils.el (net-utils-remove-ctl-m): Use memq for system-types.
(ping-program-options): Remove non-existent `linux' system-type.
This commit is contained in:
Glenn Morris 2010-11-09 20:13:21 -08:00
parent 9228bbd345
commit 17731c39b2
2 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2010-11-10 Glenn Morris <rgm@gnu.org>
* net/net-utils.el (net-utils-remove-ctl-m): Use memq for system-types.
(ping-program-options): Remove non-existent `linux' system-type.
* startup.el (package-initialize): Update declaration.
* textmodes/remember.el (remember-time-to-seconds): Remove.

6
lisp/net/net-utils.el
View file

@ -55,8 +55,7 @@
:group 'comm
:version "20.3")
(defcustom net-utils-remove-ctl-m
(member system-type (list 'windows-nt 'msdos))
(defcustom net-utils-remove-ctl-m (memq system-type '(windows-nt msdos))
"If non-nil, remove control-Ms from output."
:group 'net-utils
:type 'boolean)
@ -82,7 +81,7 @@
;; On GNU/Linux and Irix, the system's ping program seems to send packets
;; indefinitely unless told otherwise
(defcustom ping-program-options
(and (memq system-type (list 'linux 'gnu/linux 'irix))
(and (memq system-type '(gnu/linux irix))
(list "-c" "4"))
"Options for the ping program.
These options can be used to limit how many ICMP packets are emitted."
@ -889,5 +888,4 @@ from SEARCH-STRING. With argument, prompt for whois server."
(provide 'net-utils)
;; arch-tag: 97119e91-9edb-4376-838b-bf7058fa1314
;;; net-utils.el ends here