summaryrefslogtreecommitdiff
path: root/lisp/url/url-privacy.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/url/url-privacy.el')
-rw-r--r--lisp/url/url-privacy.el11
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/url/url-privacy.el b/lisp/url/url-privacy.el
index 7700bb13941..b57de81c813 100644
--- a/lisp/url/url-privacy.el
+++ b/lisp/url/url-privacy.el
@@ -1,7 +1,7 @@
;;; url-privacy.el --- Global history tracking for URL package
;; Copyright (C) 1996, 1997, 1998, 1999, 2004,
-;; 2005 Free Software Foundation, Inc.
+;; 2005, 2006 Free Software Foundation, Inc.
;; Keywords: comm, data, processes, hypermedia
@@ -33,6 +33,7 @@
;;;###autoload
(defun url-setup-privacy-info ()
+ "Setup variables that expose info about you and your system."
(interactive)
(setq url-system-type
(cond
@@ -72,13 +73,11 @@
(and (listp url-privacy-level)
(memq 'os url-privacy-level)))
nil)
- ((boundp 'system-configuration)
- system-configuration)
- ((boundp 'system-type)
- (symbol-name system-type))
+ ((boundp 'system-configuration) system-configuration)
+ ((boundp 'system-type) (symbol-name system-type))
(t nil))))
(provide 'url-privacy)
-;;; arch-tag: fdaf95e4-98f0-4680-94c3-f3eadafabe1d
+;; arch-tag: fdaf95e4-98f0-4680-94c3-f3eadafabe1d
;;; url-privacy.el ends here