Gnus: C-c C-c on newly composed message (using m key) throws error

[amittendulkar]

When I use follow up (F key) to reply all on existing message then it behaves fine and I am able to send the email.

However, when I compose a new email with m key and when I hit C-c C-c then I see the following error,

Debugger entered--Lisp error: (void-variable outlook-style-local-yank)
  (let ((ref outlook-style-local-yank)) (let ((G30717 (make-temp-file "email-new"))) (let ((new-message G30717)) (unwind-protect (let ((G30718 (make-temp-file "email-old"))) (let ((old-message G30718)) (unwind-protect (progn ... ... ...) (delete-file G30718)))) (delete-file G30717)))))
  (let ((processed-results (outlook-style--remove-and-get-inline-mail-content new-content))) (let ((ref outlook-style-local-yank)) (let ((G30717 (make-temp-file "email-new"))) (let ((new-message G30717)) (unwind-protect (let ((G30718 ...)) (let (...) (unwind-protect ... ...))) (delete-file G30717))))))
  outlook-style--generate-quoted-html(#("Message text here\n\n" 0 9 (fontified nil) 9 10 (fontified nil) 10 83 (fontified nil) 83 156 (fontified nil) 156 164 (fontified nil) 164 226 (fontified nil) 226 295 (fontified nil) 295 324 (fontified nil) 324 325 (fontified nil) 325 388 (fontified nil) 388 389 (fontified nil) 389 398 (fontified nil) 398 402 (fontified nil) 402 403 (fontified nil) 403 404 (fontified nil)))
  (if include-old (outlook-style--generate-quoted-html new-content) (outlook-style--simple-muse-message new-content))
  (let ((processed-results (if include-old (outlook-style--generate-quoted-html new-content) (outlook-style--simple-muse-message new-content)))) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results))
  (if format-muse (let ((processed-results (if include-old (outlook-style--generate-quoted-html new-content) (outlook-style--simple-muse-message new-content)))) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings))
  (let* ((options (outlook-style--find-all-options-from-config end-of-settings)) (format-muse (find "format_muse" options :test (function equal))) (include-old (find "quote_history" options :test (function equal))) (new-content (buffer-substring (outlook-style--mail-body-start-point) start-of-settings)) (old-content (buffer-substring end-of-settings (point-max)))) (if (and (not format-muse) include-old) (progn (error "The old email chain can only be included when 'format_muse' is enabled."))) (if format-muse (let ((processed-results (if include-old (outlook-style--generate-quoted-html new-content) (outlook-style--simple-muse-message new-content)))) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings)))
  (let ((start-of-settings (point)) (end-of-settings (outlook-style--find-end-of-settings))) (forward-line 1) (let* ((options (outlook-style--find-all-options-from-config end-of-settings)) (format-muse (find "format_muse" options :test (function equal))) (include-old (find "quote_history" options :test (function equal))) (new-content (buffer-substring (outlook-style--mail-body-start-point) start-of-settings)) (old-content (buffer-substring end-of-settings (point-max)))) (if (and (not format-muse) include-old) (progn (error "The old email chain can only be included when 'format_muse' is enabled."))) (if format-muse (let ((processed-results (if include-old (outlook-style--generate-quoted-html new-content) (outlook-style--simple-muse-message new-content)))) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings))))
  (progn (forward-line 0) (let ((start-of-settings (point)) (end-of-settings (outlook-style--find-end-of-settings))) (forward-line 1) (let* ((options (outlook-style--find-all-options-from-config end-of-settings)) (format-muse (find "format_muse" options :test (function equal))) (include-old (find "quote_history" options :test (function equal))) (new-content (buffer-substring (outlook-style--mail-body-start-point) start-of-settings)) (old-content (buffer-substring end-of-settings (point-max)))) (if (and (not format-muse) include-old) (progn (error "The old email chain can only be included when 'format_muse' is enabled."))) (if format-muse (let ((processed-results (if include-old ... ...))) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings)))))
  (if (search-forward-regexp (concat "^" (regexp-quote outlook-style-conf-start) "$") nil t) (progn (forward-line 0) (let ((start-of-settings (point)) (end-of-settings (outlook-style--find-end-of-settings))) (forward-line 1) (let* ((options (outlook-style--find-all-options-from-config end-of-settings)) (format-muse (find "format_muse" options :test (function equal))) (include-old (find "quote_history" options :test (function equal))) (new-content (buffer-substring (outlook-style--mail-body-start-point) start-of-settings)) (old-content (buffer-substring end-of-settings (point-max)))) (if (and (not format-muse) include-old) (progn (error "The old email chain can only be included when 'format_muse' is enabled."))) (if format-muse (let ((processed-results ...)) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings))))))
  (save-excursion (message-goto-body) (if (search-forward-regexp (concat "^" (regexp-quote outlook-style-conf-start) "$") nil t) (progn (forward-line 0) (let ((start-of-settings (point)) (end-of-settings (outlook-style--find-end-of-settings))) (forward-line 1) (let* ((options (outlook-style--find-all-options-from-config end-of-settings)) (format-muse (find "format_muse" options :test ...)) (include-old (find "quote_history" options :test ...)) (new-content (buffer-substring ... start-of-settings)) (old-content (buffer-substring end-of-settings ...))) (if (and (not format-muse) include-old) (progn (error "The old email chain can only be included when 'format_muse' is enabled."))) (if format-muse (let (...) (outlook-style--prepare-buffer-for-submit new-content old-content processed-results)) (delete-region start-of-settings end-of-settings)))))))
  outlook-style--call-muse-for-message()
  run-hooks(message-send-hook)
  message-send(nil)
  message-send-and-exit(nil)
  call-interactively(message-send-and-exit)
  (let (orgstruct-mode) (call-interactively (or (key-binding "") (quote orgstruct-error))))
  (if (org-context-p (quote headline) (quote item) (and orgstruct-is-++ nil (quote item-body))) (org-run-like-in-org-mode (quote org-ctrl-c-ctrl-c)) (let (orgstruct-mode) (call-interactively (or (key-binding "") (quote orgstruct-error)))))
  orgstruct-hijacker-command-21(1)
  call-interactively(orgstruct-hijacker-command-21)
  orgtbl-ctrl-c-ctrl-c(nil)
  call-interactively(orgtbl-ctrl-c-ctrl-c nil nil)