I am writing Latex Style Files and want to improve the appearance of Camel Case Variables and Functions. What kind of elisp function can I write to enhance readability.
Have been directed to
glasses.el. Rather than install another minor-mode to my configuration, I would like to take out the part that sets capital letters to a different colour.
Looking at the code I have identified
glasses-make-overlay. But I need help to construct a function or two to enable and disable the colour functionality.
Have been working with the following function
(defun change-face-for-camel-case (face) "Change the face of capital letters in CamelCase words throughout the buffer. FACE is the face to apply to the capital letters." (interactive "MFace for CamelCase letters: ") (let ((case-fold-search nil)) (save-excursion (goto-char (point-min)) (while (re-search-forward "\\b\\([A-Z][a-z0-9]*\\)\\([A-Z][a-z0-9]*\\)\\b" nil t) (add-text-properties (match-beginning 1) (match-end 1) `(face ,face)) (add-text-properties (match-beginning 2) (match-end 2) `(face ,face))) (font-lock-fontify-buffer)))) ;; Bind the function to a key for easy use, e.g., F5 (global-set-key (kbd "<f5>") (lambda () (interactive) (change-face-for-camel-case 'font-lock-variable-name-face)))