Variable: glasses-face
glasses-face is a customizable variable defined in glasses.el.gz.
Value
nil
Documentation
Face to use for capital letters of identifiers where separators were added.
If it is nil, the capital letters will display with their usual faces.
For example, you can set glasses-separator to an empty string and
glasses-face to bold. Then unreadable identifiers will have no separators,
but will have their capitals in bold.
As another example, you may wish to have a clear visual indication of
where the glasses-separator string was inserted by glasses-mode(var)/glasses-mode(fun),
as opposed to where they are part of the original identifiers. This
can be useful when the program source code uses mixed CamelCase and
normal_readable identifiers, and you want to know which underscores
were added by this mode. Customizing this face to something like bold
will show the capital letters following the inserted glasses-separator
in a distinct face. Note that you must use customize-variable for
changing the face; just assigning the value has no effect.
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/glasses.el.gz
(defcustom glasses-face nil
"Face to use for capital letters of identifiers where separators were added.
If it is nil, the capital letters will display with their usual faces.
For example, you can set `glasses-separator' to an empty string and
`glasses-face' to `bold'. Then unreadable identifiers will have no separators,
but will have their capitals in bold.
As another example, you may wish to have a clear visual indication of
where the `glasses-separator' string was inserted by `glasses-mode',
as opposed to where they are part of the original identifiers. This
can be useful when the program source code uses mixed CamelCase and
normal_readable identifiers, and you want to know which underscores
were added by this mode. Customizing this face to something like `bold'
will show the capital letters following the inserted `glasses-separator'
in a distinct face. Note that you must use `customize-variable' for
changing the face; just assigning the value has no effect."
:type '(choice (const :tag "None" nil) face)
:set 'glasses-custom-set
:initialize 'custom-initialize-default)