comparison lisp/vcursor.el @ 107378:904ccd8f2acb

Reorganize Custom groups. * cus-edit.el (processes): Remove from development group. (oop, hypermedia): Delete group. (net): New group. * url/url-vars.el (url): * net/browse-url.el (browse-url): * net/xesam.el (xesam): * net/tramp.el (tramp): * net/goto-addr.el (goto-address): * net/ange-ftp.el (ange-ftp): Put in net group. * view.el (view): Remove from editing group. * uniquify.el (uniquify): Put in files group. * net/browse-url.el (browse-url): * ps-print.el (postscript): Put in external group. * cus-edit.el (outlines): * textmodes/text-mode.el (text-mode-hook): * textmodes/table.el (table): * textmodes/picture.el (picture): * outline.el (outlines): Put in wp group. * nxml/nxml-mode.el (nxml): Remove from wp group. * net/tramp-imap.el (tramp-imap): Put in tramp group. * mail/metamail.el (metamail): Remove from hypermedia group. * cus-edit.el (abbrev): * whitespace.el (whitespace): * vcursor.el (vcursor): * reveal.el (reveal): * hl-line.el (hl-line): Put in convenience group. * epg-config.el (epg): Put in data group. * emulation/pc-select.el (pc-select): Put in emulations group. * calculator.el (calculator): Put in applications group. * org/org.el (org): Remove from hypermedia group.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 12 Mar 2010 12:47:22 -0500
parents 1d1d5d9bd884
children 417b1e4d63cd
comparison
equal deleted inserted replaced
107377:f5c46cf84e9f 107378:904ccd8f2acb
323 (eval-when-compile (require 'compare-w)) 323 (eval-when-compile (require 'compare-w))
324 324
325 (defgroup vcursor nil 325 (defgroup vcursor nil
326 "Manipulate an alternative (\"virtual\") cursor." 326 "Manipulate an alternative (\"virtual\") cursor."
327 :prefix "vcursor-" 327 :prefix "vcursor-"
328 :group 'editing) 328 :group 'convenience)
329 329
330 (defface vcursor 330 (defface vcursor
331 '((((class color)) (:foreground "blue" :background "cyan" :underline t)) 331 '((((class color)) (:foreground "blue" :background "cyan" :underline t))
332 (t (:inverse-video t :underline t))) 332 (t (:inverse-video t :underline t)))
333 "Face for the virtual cursor." 333 "Face for the virtual cursor."