diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2009-09-06 21:22:05 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2009-09-06 21:22:05 +0000 |
| commit | a60f2e7b9c0567bec9ba06c73ccad235b32d8b8f (patch) | |
| tree | 0675cf49c3245bbb7b750b6c6b61df980715fc17 /lisp/cedet/semantic/bovine/el.el | |
| parent | 6ca2fce3b8d345e619694f64c99013574000d0b3 (diff) | |
| download | emacs-a60f2e7b9c0567bec9ba06c73ccad235b32d8b8f.tar.gz | |
Minor whitespace changes and `require' fixes.
Diffstat (limited to 'lisp/cedet/semantic/bovine/el.el')
| -rw-r--r-- | lisp/cedet/semantic/bovine/el.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/cedet/semantic/bovine/el.el b/lisp/cedet/semantic/bovine/el.el index 5770d33d00a..596e29228f9 100644 --- a/lisp/cedet/semantic/bovine/el.el +++ b/lisp/cedet/semantic/bovine/el.el @@ -463,7 +463,7 @@ Return a bovination list to use." (condition-case nil ;; Try an Emacs 22 fcn. This throws errors. (find-library-name (semantic-tag-name tag)) - (error + (error (message "semantic: connot find source file %s" (semantic-tag-name tag)))) ;; No handy function available. (Older Emacsen) @@ -533,14 +533,14 @@ Optional argument NOSNARF is ignored." (cond ((eq (semantic-tag-class tag) 'function) (setq d (documentation sym))) (t - (setq d (documentation-property + (setq d (documentation-property sym 'variable-documentation))))) ;; Label it as system doc.. perhaps just for debugging ;; purposes. (if d (setq d (concat "Sytem Doc: \n" d))) )) ) - + (when d (concat (substitute-command-keys |