Permalink
Browse files

Add a return statement to the first cond form

  • Loading branch information...
wfarr committed Apr 24, 2009
1 parent badf1a3 commit 803a5e434f19921cd96f1264ed701904bd156f81
Showing with 1 addition and 1 deletion.
  1. +1 −1 add-import.el
View
@@ -16,7 +16,7 @@
((not (string= major-mode "fundamental-mode"))
(let ((current-mode (symbol-name major-mode)))
(string-match "^\\([[:alpha:]-]+\\)\\-mode" current-mode)
- (match-string 1 current-mode)))
+ (return (match-string 1 current-mode))))
;; check extension
((or (buffer-file-name) (buffer-name))
(let ((bufname (or (buffer-file-name) (buffer-name))))

0 comments on commit 803a5e4

Please sign in to comment.