   (push (list *pjs-class-definition* 1 font-lock-type-face) font-locks)
   
   ;; New type
-  (push (list *pjs-new-type-regexp* 1 font-lock-type-face) font-locks)
+  ;; (push (list *pjs-new-type-regexp* 1 font-lock-type-face) font-locks)
 
   ;; symbols
   (push (list *pjs-symbols* 0 font-lock-preprocessor-face) font-locks)  
-  
-  ;; class types, plc.something
-  (push (list *pjs-class-type* 0 font-lock-type-face) font-locks)
-  
+    
   ;; Function definition
   (push (list *pjs-function-heading* 1 font-lock-function-name-face) font-locks)
   ;; Function arguments


  ;; list of font-lock-keywords in the right order

  ;; Functions defined in buffers  
  (push (list 'search-pjs-current-namespace-functions 1 font-lock-function-name-face) font-locks)


  (let ((match-data (match-data))
	continue)
    (or (catch 'exit
	  (while (re-search-forward *pjs-vars-with-members-or-methods* end t)
	    (save-match-data
	      (let* ((member   (downcase (match-string-no-properties 1)))
		     (var-type (get-variable-type-in-context (match-beginning 0))))
