[O] Bug: src block face [8.3.1 (8.3.1-56-g17a225-elpaplus @ /Users/ctanis/.emacs.d/elpa/org-plus-contrib-20150817/)]

[Tanis, Craig]

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

SRC blocks don't show correct face when a language is specified.

#+begin_src 
  correctly shows in 'org-block face
#+end_src

#+begin_src language
incorrectly shows in 'default face
#+end_src





Emacs  : GNU Emacs 24.5.1 (x86_64-apple-darwin14.3.0, NS apple-appkit-1347.57)
of 2015-04-15 on zartan
Package: Org-mode version 8.3.1 (8.3.1-56-g17a225-elpaplus @ 
/Users/ctanis/.emacs.d/elpa/org-plus-contrib-20150817/)

current state:
==============
(setq
org-tab-first-hook '(yas/org-very-safe-expand org-hide-block-toggle-maybe
                      org-babel-hide-result-toggle-maybe 
org-babel-header-arg-expand)
org-goto-interface 'outline-path-completion
org-speed-command-hook '(org-speed-command-default-hook 
org-babel-speed-command-hook)
org-agenda-diary-file "~/Dropbox/org/diary.org"
org-mac-grab-Chrome-app-p nil
org-occur-hook '(org-first-headline-recenter)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-log-done 'time
org-confirm-shell-link-function 'yes-or-no-p
org-image-actual-width nil
org-mac-grab-Firefox-app-p nil
org-startup-folded nil
org-yank-folded-subtrees nil
org-list-allow-alphabetical t
org-special-ctrl-a/e 'reversed
org-after-todo-state-change-hook '(org-clock-out-if-current)
org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '(#[nil "\301\302\303#\207"
                   [org-mode-map define-key "g" org-mac-grab-link] 4]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all 
append
                    local]
                   5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook 
org-babel-show-result-all
                    append local]
                   5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes 
org-eldoc-load
                 (lambda nil (make-variable-buffer-local (quote 
yas/trigger-key))
                  (setq yas/trigger-key [tab])
                  (if (member (quote yas/org-very-safe-expand) 
org-tab-first-hook)
                   org-tab-first-hook
                   (setq org-tab-first-hook
                    (cons (quote yas/org-very-safe-expand) org-tab-first-hook))
                   )
                  (define-key yas/keymap [tab] (quote yas-next-field)))
                 (lambda nil (local-set-key "\220" (quote org-backward-element))
                  (local-set-key "\216" (quote org-forward-element))
                  (local-set-key "\373" (quote backward-paragraph))
                  (local-set-key "\375" (quote forward-paragraph))
                  (local-set-key "\225" (quote org-up-list-or-element))
                  (local-set-key "\204" (quote org-down-element))
                  (local-set-key "\367" (quote org-refile-fullpath))
                  (local-set-key "\342" (quote org-mark-ring-goto))
                  (local-set-key "\356" (quote org-next-block))
                  (local-set-key "\360" (quote org-previous-block))
                  (auto-fill-mode 1) (toggle-truncate-lines -1)
                  (local-set-key (kbd "C-c SPC") (quote ace-jump-mode)))
                 )
org-refile-targets '((nil :maxlevel . 9))
org-outline-path-complete-in-steps nil
org-archive-hook '(org-attach-archive-delete-maybe)
org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
org-refile-use-outline-path t
org-directory "~/Dropbox/org"
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
org-archive-default-command 'org-toggle-archive-tag
org-hide-emphasis-markers t
org-catch-invisible-edits 'smart
org-babel-tangle-lang-exts '(("python" . "py") ("java" . "java") ("D" . "d")
                              ("C++" . "cpp") ("perl" . "pl") ("emacs-lisp" . 
"el")
                              ("elisp" . "el"))
org-confirm-elisp-link-function 'yes-or-no-p
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-log-into-drawer t
org-ditaa-jar-path "/usr/local/Cellar/ditaa/0.9/libexec/ditaa0_9.jar"
org-completion-use-ido t
org-babel-load-languages '((emacs-lisp . t) (perl . t) (C . t) (java . t)
                            (python . t) (ditaa . t) (dot . t) (gnuplot . t)
                            (octave . t) (calc . t) (sh . t))
org-cycle-global-at-bob t

org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
)


----
Craig Tanis, Ph.D.
UTC Computer Science
address@hidden