diff options
author | Tom Willemse | 2019-04-09 14:05:09 -0700 |
---|---|---|
committer | Tom Willemse | 2019-04-09 14:05:49 -0700 |
commit | 63401d1ae7606ca90401cfd02b1e2e462a303864 (patch) | |
tree | b17c583a038c5705f0540dd1dae6278ec259415a | |
parent | ffae62c08b8122e10bb16cc4af1e29f9ed165808 (diff) | |
download | emacs-config-63401d1ae7606ca90401cfd02b1e2e462a303864.tar.gz emacs-config-63401d1ae7606ca90401cfd02b1e2e462a303864.zip |
Fix typo, make annotations disappear when empties
-rw-r--r-- | oni-csharp.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/oni-csharp.el b/oni-csharp.el index 38ee6ac..de5db3a 100644 --- a/oni-csharp.el +++ b/oni-csharp.el @@ -25,12 +25,12 @@ ;;; Code: -(defvar oni-chsarp--projects (make-hash-table :test 'equal)) +(defvar oni-csharp--projects (make-hash-table :test 'equal)) -(defun oni-chsarp-collect-project-names () +(defun oni-csharp-collect-project-names () "Go through the current buffer and collect all the project names." (interactive) - (clrhash oni-chsarp--projects) + (clrhash oni-csharp--projects) (save-excursion (goto-char (point-min)) (while (re-search-forward @@ -49,7 +49,7 @@ :noerror) (puthash (match-string-no-properties 3) (match-string-no-properties 2) - oni-chsarp--projects)))) + oni-csharp--projects)))) (defun oni-csharp-display-project-names () "Display the project names in the current buffer." @@ -70,9 +70,10 @@ :noerror) (let ((current-overlay (make-overlay (line-beginning-position) (line-end-position)))) (overlay-put current-overlay 'after-string - (propertize (format " => %s" (gethash (match-string 1) oni-chsarp--projects)) + (propertize (format " => %s" (gethash (match-string 1) oni-csharp--projects)) 'face '(:foreground "#808080"))) - (overlay-put current-overlay 'oni-csharp--overlayp t))))) + (overlay-put current-overlay 'oni-csharp--overlayp t) + (overlay-put current-overlay 'evaporate t))))) (provide 'oni-csharp) ;;; oni-csharp.el ends here |