]> code.delx.au - gnu-emacs/blobdiff - lisp/fringe.el
Fix typos.
[gnu-emacs] / lisp / fringe.el
index 6f5f496e907d2fb8071b4713a37e1da3afac9eaf..fa5ebb6f0c675d08cded81b385f5e5df018deb73 100644 (file)
@@ -1,7 +1,6 @@
 ;;; fringe.el --- fringe setup and control  -*- coding: utf-8 -*-
 
-;; Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008,
-;;   2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 2002-2011 Free Software Foundation, Inc.
 
 ;; Author: Simon Josefsson <simon@josefsson.org>
 ;; Maintainer: FSF
@@ -97,7 +96,7 @@
   "Non-nil means `set-fringe-mode' should really do something.
 This is nil while loading `fringe.el', and t afterward.")
 
-(defun set-fringe-mode-1 (ignore value)
+(defun set-fringe-mode-1 (_ignore value)
   "Call `set-fringe-mode' with VALUE.
 See `fringe-mode' for valid values and their effect.
 This is usually invoked when setting `fringe-mode' via customize."
@@ -193,7 +192,7 @@ frame parameter is used."
                 (concat
                  "Select fringe mode for "
                  (if all-frames "all frames" "selected frame")
-                 " (type ? for list): ")
+                 ": ")
                 fringe-styles nil t))
          (style (assoc (downcase mode) fringe-styles)))
     (if style (cdr style)
@@ -269,5 +268,4 @@ SIDE must be the symbol `left' or `right'."
 
 (provide 'fringe)
 
-;; arch-tag: 6611ef60-0869-47ed-8b93-587ee7d3ff5d
 ;;; fringe.el ends here