Variable: glasses-mode

glasses-mode is a buffer-local variable defined in glasses.el.gz.

Documentation

Non-nil if Glasses mode is enabled.

Use the command glasses-mode(var)/glasses-mode(fun) to change this variable.

Probably introduced at or before Emacs version 21.1.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/glasses.el.gz
;;; Minor mode definition


;;;###autoload
(define-minor-mode glasses-mode
  "Minor mode for making identifiers likeThis readable.

When this mode is active, it tries to add virtual
separators (like underscores) at places they belong to."
  :group 'glasses :lighter " o^o"
  (save-excursion
    (save-restriction
      (widen)
      ;; We erase all the overlays anyway, to avoid dual sight in some
      ;; circumstances
      (glasses-make-unreadable (point-min) (point-max))
      (if glasses-mode
	  (progn
	    (jit-lock-register 'glasses-change)
	    (add-hook 'write-file-functions
		      'glasses-convert-to-unreadable nil t))
	(jit-lock-unregister 'glasses-change)
	(remove-hook 'write-file-functions
		     'glasses-convert-to-unreadable t)))))