--- a/.emacs-my	Fri Aug 05 16:34:43 2011 +0300
+++ b/.emacs-my	Fri Aug 05 17:03:02 2011 +0300
@@ -752,6 +752,12 @@
  (t
   (setq browse-url-browser-function 'browse-url-mozilla)))
 
+(defun my-cygwin-search (str)
+  "Search for Cygwin package on-line."
+  (interactive (list (read-input "Search for Cygwin package on-line: ")))
+  (browse-url (format "http://cygwin.com/cgi-bin2/package-grep.cgi?grep=%s" str))
+  )
+
 ;;; ----------------------------------------------------------------
 (message "calendar")
 
@@ -786,7 +792,7 @@
 ;;; ----------------------------------------------------------------
 (message "unknown")
 
-;; browse-url mailcrypt gnus message sendmail bbdb pilot bibtex eiffel-mode emacs-w3m
+;; mailcrypt gnus message sendmail bbdb pilot bibtex eiffel-mode emacs-w3m
 ;; eudc filladapt hugs-mode mpg123 php-mode ps-print
 ;; chord-mode - edit guitar music
 ;; discography - variant of BibTeX mode for discographies