   (move-end-of-line nil))
 
 ;;; Ctrl-> to right-aligh the text after point
-(global-set-key [(control >)] 'bde-aligh-right)
+(global-set-key [(control >)] 'bde-align-right)
 
  


;;; BDE's right style comments such as // RETURN or // LOCK

(defun bde-aligh-right ()
  "Set the right amount of spaces around the point so the text
  after point is right-aligned (for things such as // RETURN). It
  works even if point is in a C++ comment."

                (if (string= (match-string 1) "<")
                    (setq level (+ level 1))
                  (setq level (- level 1)))
              (setq level 0))))
        (forward-line))
      (when (re-search-forward "^\\(class\\|struct\\) " (point-at-eol) t)
        (concat (match-string 1) " " (current-word))))))
