]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/ede/project-am.el
Shrink EIEIO object header. Move generics to eieio-generic.el.
[gnu-emacs] / lisp / cedet / ede / project-am.el
index 75fd195105f827dc0a6e5b4876e9d4687e207950..d0ca8091c9024357a4202dafee586f6eeb7515ff 100644 (file)
@@ -853,13 +853,13 @@ Argument FILE is the file to extract the end directory name from."
 (defun project-am-preferred-target-type (file)
   "For FILE, return the preferred type for that file."
   (cond ((string-match "\\.texi?\\(nfo\\)$" file)
-        project-am-texinfo)
+        'project-am-texinfo)
        ((string-match "\\.[0-9]$" file)
-        project-am-man)
+        'project-am-man)
        ((string-match "\\.el$" file)
-        project-am-lisp)
+        'project-am-lisp)
        (t
-        project-am-program)))
+        'project-am-program)))
 
 (defmethod ede-buffer-header-file((this project-am-objectcode) buffer)
   "There are no default header files."