Invalid function: ensure-on-issue-id

[opie4624]

org-jira-get-issues-headonly works fine, but org-jira-get-issues results in this: with (setq debug-on-error t)

Debugger entered--Lisp error: (invalid-function ensure-on-issue-id)
  ensure-on-issue-id("SYS-481" nil)
  #[(heading-entry) "\305�\306  !\307�Q�\310\n!\211�\2030��eY\2030��dX\2030��b\210\311 \210eb\210\312y\210`d|\210\202G�\313 \203;�\314 \210\202B�db\210\315\316!\210\n\317\261�\210\320\321\322\323 \f\"#c)\"\207" [issue-id heading-entry entry-heading p issue ensure-on-issue-id symbol-name ": " org-find-exact-headline-in-buffer org-narrow-to-subtree 1 org-goto-first-child org-insert-heading org-insert-subheading t "\n" replace-regexp-in-string "^" "  " org-jira-get-issue-val] 9](description)
  mapc(#[(heading-entry) "\305�\306 !\307�Q�\310\n!\211�\2030��eY\2030��dX\2030��b\210\311 \210eb\210\312y\210`d|\210\202G�\313 \203;�\314 \210\202B�db\210\315\316!\210\n\317\261�\210\320\321\322\323 \f\"#c)\"\207" [issue-id heading-entry entry-heading p issue ensure-on-issue-id symbol-name ": " org-find-exact-headline-in-buffer org-narrow-to-subtree 1 org-goto-first-child org-insert-heading org-insert-subheading t "\n" replace-regexp-in-string "^" "  " org-jira-get-issue-val] 9] (description))
  #[(issue) "\306\307�\"A�\306\310�\"A�\306\311�\"A\211��\312   \313P
\"�.\314�.!\206'�\315�.!�/r�/q\210\316\317!\210~\210\320 \210eb\210\321\n!�0\214�0\203a��0eY\203a��0dX\203a��0b\210\322\323!\210\324 \210\202p�db\210\325\326!\204m�\327c\210\330c\210\331\332�\"\333\235\203}�\334\202~�\335\fPc\210\212\336\327d\337#\204\216�\327c\210)\340 \210\341e\212\337y\210`)\342\343\344\n#\345$\210\346\347\350\"\210\351`\352\306\310�\"A#\210\346\353\354\"\210\355 .�\207" [issue proj-key issue-id issue-summary issue-headline org-jira-working-dir assoc project key summary expand-file-name ".org" find-buffer-visiting find-file org-jira-mode t show-all org-find-entry-with-id forward-thing whitespace kill-line looking-at "^" "\n" "* " org-jira-get-issue-val status ("Closed" "Resolved") "DONE " "TODO " search-forward 1 org-narrow-to-subtree org-change-tag-in-region replace-regexp-in-string "-" "_" nil mapc #[(entry) "\303�    \"\211�\205��\n\304\230?\205��\305`\306�!\n#)\207" [entry issue val org-jira-get-issue-val "" org-entry-put symbol-name] 5] (assignee reporter type priority resolution status components created updated) org-entry-put "ID" #[(heading-entry) "\305�\306  !\307�Q�\310\n!\211�\2030��eY\2030��dX\2030��b\210\311 \210eb\210\312y\210`d|\210\202G�\313 \203;�\314 \210\202B�db\210\315\316!\210\n\317\261�\210\320\321\322\323 \f\"#c)\"\207" [issue-id heading-entry entry-heading p issue ensure-on-issue-id symbol-name ": " org-find-exact-headline-in-buffer org-narrow-to-subtree 1 org-goto-first-child org-insert-heading org-insert-subheading t "\n" replace-regexp-in-string "^" "  " org-jira-get-issue-val] 9] (description) org-jira-update-comments-for-current-issue project-file project-buffer p] 8](((id . "12243") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-12-01T02:23:20.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-481") (priority) (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "True SMS not Email -> SMS") (type . "7") (updated . "2013-04-01T22:53:17.000Z") (votes . 0)))
  mapc(#[(issue) "\306\307�\"A�\306\310�\"A�\306\311�\"A\211��\312  \313P
\"�.\314�.!\206'�\315�.!�/r�/q\210\316\317!\210~\210\320 \210eb\210\321\n!�0\214�0\203a��0eY\203a��0dX\203a��0b\210\322\323!\210\324 \210\202p�db\210\325\326!\204m�\327c\210\330c\210\331\332�\"\333\235\203}�\334\202~�\335\fPc\210\212\336\327d\337#\204\216�\327c\210)\340 \210\341e\212\337y\210`)\342\343\344\n#\345$\210\346\347\350\"\210\351`\352\306\310�\"A#\210\346\353\354\"\210\355 .�\207" [issue proj-key issue-id issue-summary issue-headline org-jira-working-dir assoc project key summary expand-file-name ".org" find-buffer-visiting find-file org-jira-mode t show-all org-find-entry-with-id forward-thing whitespace kill-line looking-at "^" "\n" "* " org-jira-get-issue-val status ("Closed" "Resolved") "DONE " "TODO " search-forward 1 org-narrow-to-subtree org-change-tag-in-region replace-regexp-in-string "-" "_" nil mapc #[(entry) "\303�    \"\211�\205��\n\304\230?\205��\305`\306�!\n#)\207" [entry issue val org-jira-get-issue-val "" org-entry-put symbol-name] 5] (assignee reporter type priority resolution status components created updated) org-entry-put "ID" #[(heading-entry) "\305�\306  !\307�Q�\310\n!\211�\2030��eY\2030��dX\2030��b\210\311 \210eb\210\312y\210`d|\210\202G�\313 \203;�\314 \210\202B�db\210\315\316!\210\n\317\261�\210\320\321\322\323 \f\"#c)\"\207" [issue-id heading-entry entry-heading p issue ensure-on-issue-id symbol-name ": " org-find-exact-headline-in-buffer org-narrow-to-subtree 1 org-goto-first-child org-insert-heading org-insert-subheading t "\n" replace-regexp-in-string "^" "  " org-jira-get-issue-val] 9] (description) org-jira-update-comments-for-current-issue project-file project-buffer p] 8] (((id . "12243") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-12-01T02:23:20.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-481") (priority) (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "True SMS not Email -> SMS") (type . "7") (updated . "2013-04-01T22:53:17.000Z") (votes . 0)) ((id . "12244") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-12-01T02:24:29.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-482") (priority) (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "Handle On-Call Rotation") (type . "7") (updated . "2013-02-25T20:54:43.000Z") (votes . 0)) ((id . "13449") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-23T15:26:55.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Things like competitor sites should not cause an alert to be sent.") (duedate) (environment) (fixVersions) (key . "SYS-762") (priority . "8") (project . "SYS") (reporter . "tarrant") (resolution) (status . "10002") (summary . "Pingdom nagios alert should not notify for non-critical properties.") (type . "3") (updated . "2013-04-08T22:15:06.000Z") (votes . 0)) ((id . "13619") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-04T21:22:47.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "This should be the parent for all NRPE checks.") (duedate) (environment) (fixVersions) (key . "SYS-800") (priority . "8") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "Create a \"Check NRPE\" check") (type . "3") (updated . "2013-04-08T22:15:14.000Z") (votes . 0)) ((id . "13222") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-05T22:30:07.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-680") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "Documentation: How to not get locked out of Gmail") (type . "3") (updated . "2013-03-19T00:51:27.000Z") (votes . 0)) ((id . "13315") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-11T23:52:11.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-708") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Project: Virtualization") (type . "3") (updated . "2013-02-11T23:54:56.000Z") (votes . 0)) ((id . "13317") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-11T23:54:34.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Focus on Management tools and integration with other things (ie: puppet, nagios, ganglia)\n\n* KVM\n* Eucalyptus\n* Foreman\n") (duedate) (environment) (fixVersions) (key . "SYS-710") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Phase 2: Testing") (type . "7") (updated . "2013-04-01T22:53:58.000Z") (votes . 0)) ((id . "13547") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-27T23:33:50.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "* (+) DB\n** TMI\n** Countess\n** Site_DB rails_readonly (RO)\n** Site_DB rails (RW)\n** Usher read\n** Usher write\n** (-) PGBouncer external\n* (-) S3 - Appkey/Pass\n* (-) JTVFS\n* (-) 3rd Party Tokens, keys, etc.\n* SSH Keys\n** (+) Brigade NPW\n** (+) Brigade Push\n** (+) Brigade Pull\n** (-) root_key\n** (+) database key (postgres user)\n** (+) backup key\n** (-) JTV Private Key\n* (-) TMI - In Puppet?\n* (-) VPN Cert\n\nh3. Notes\n* (-) Denotes items that are internet accessible\n* (+) Denotes items that are not internet accessible") (duedate) (environment) (fixVersions) (key . "SYS-785") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Security Shizzle") (type . "3") (updated . "2013-03-11T22:15:40.000Z") (votes . 0)) ((id . "13608") (affectsVersions) (assignee . "akraut") (attachmentNames "2013-03-25_11-22-24_197.jpg") (components) (created . "2013-03-03T03:59:07.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-796") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "RMA Drive in boing163") (type . "3") (updated . "2013-04-03T01:30:21.000Z") (votes . 0)) ((id . "13636") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-05T09:09:32.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Mirror all repos to from git1 to git2. Get web and video onboard make sure their repos are being copied.") (duedate) (environment) (fixVersions) (key . "SYS-814") (priority . "6") (project . "SYS") (reporter . "gary") (resolution) (status . "10002") (summary . "Mirror all repos to from git1 to git2") (type . "3") (updated . "2013-04-01T23:26:12.000Z") (votes . 0)) ((id . "13774") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-16T01:44:39.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "We need one of the archive puller boxes to be turned into a wowza box for some performance testing.  Any box will do, the services are in darklaunch so they can just be stopped with no consequences to users.") (duedate) (environment) (fixVersions) (key . "SYS-873") (priority . "6") (project . "SYS") (reporter . "jorge") (resolution) (status . "3") (summary . "Wowza testing on archive puller boxes") (type . "3") (updated . "2013-03-19T20:02:58.000Z") (votes . 0)) ((id . "13809") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-18T22:18:22.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-878") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "delete old jtv key") (type . "7") (updated . "2013-03-18T22:18:41.000Z") (votes . 0)) ((id . "13901") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-25T08:01:03.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "* job29.sfo01\n* job30.sfo01\n* job31.sfo01\n* job32.sfo01") (duedate) (environment) (fixVersions) (key . "SYS-912") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "upgrade memory in sfo01") (type . "3") (updated . "2013-03-25T20:30:55.000Z") (votes . 0)) ((id . "13917") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-26T03:07:49.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-922") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Build new mail boxes") (type . "3") (updated . "2013-04-08T22:33:17.000Z") (votes . 0)) ((id . "13948") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-29T01:31:44.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Currently, the ~jtv/.ssh/authorized_keys for many servers (discovery1 in particular) only allow access with the npw_brigade key from the brigade1.sfo01.justin.tv host. We need to make it so they're also accepted from the new brigade host (brigade2.sfo01.justin.tv).\n\nThis is necessary for deploying from the new brigade host.\n\n# From: npw_brigade\nfrom=\"199.9.250.11\"") (duedate) (environment) (fixVersions) (key . "SYS-937") (priority . "6") (project . "SYS") (reporter . "doug") (resolution) (status . "10002") (summary . "npw_brigade authorized_keys need to have brigade2.sfo01.justin.tv allowed") (type . "3") (updated . "2013-04-05T23:02:18.000Z") (votes . 0)) ((id . "13966") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-01T22:50:26.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-945") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "take captures on job26 and a span port") (type . "3") (updated . "2013-04-01T22:50:41.000Z") (votes . 0)) ((id . "14106") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-08T19:59:27.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Elizabeth Baker starting 4/11/13 \nAllen Lee starting 4/15/13\n\nboth are on the wiki, thanks!") (duedate) (environment) (fixVersions) (key . "SYS-977") (priority . "6") (project . "SYS") (reporter . "jessica") (resolution) (status . "3") (summary . "New Hires LDAP Needed") (type . "3") (updated . "2013-04-09T02:25:59.000Z") (votes . 0)) ((id . "14129") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-08T23:45:42.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-997") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "Enable http-smart-mode git access on git.internal") (type . "3") (updated . "2013-04-08T23:45:57.000Z") (votes . 0)) ((id . "10115") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-07-13T04:12:26.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil)) ((customfieldId . "customfield_10101") (key) (values "11/Feb/13"))) (description . "stats1 is a Dell PE 850 (which needs to be decommissioned). stats runs apiwiki.justin.tv. This needs to move either to a new standard system or 3rd party service.\n") (duedate) (environment) (fixVersions) (key . "SYS-17") (priority . "7") (project . "SYS") (reporter . "gary") (resolution) (status . "3") (summary . "Replace stats1 with a 64bit system") (type . "3") (updated . "2013-02-11T23:35:10.000Z") (votes . 0))))
  org-jira-get-issues((((id . "12243") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-12-01T02:23:20.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-481") (priority) (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "True SMS not Email -> SMS") (type . "7") (updated . "2013-04-01T22:53:17.000Z") (votes . 0)) ((id . "12244") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-12-01T02:24:29.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-482") (priority) (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "Handle On-Call Rotation") (type . "7") (updated . "2013-02-25T20:54:43.000Z") (votes . 0)) ((id . "13449") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-23T15:26:55.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Things like competitor sites should not cause an alert to be sent.") (duedate) (environment) (fixVersions) (key . "SYS-762") (priority . "8") (project . "SYS") (reporter . "tarrant") (resolution) (status . "10002") (summary . "Pingdom nagios alert should not notify for non-critical properties.") (type . "3") (updated . "2013-04-08T22:15:06.000Z") (votes . 0)) ((id . "13619") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-04T21:22:47.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "This should be the parent for all NRPE checks.") (duedate) (environment) (fixVersions) (key . "SYS-800") (priority . "8") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "Create a \"Check NRPE\" check") (type . "3") (updated . "2013-04-08T22:15:14.000Z") (votes . 0)) ((id . "13222") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-05T22:30:07.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-680") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10003") (summary . "Documentation: How to not get locked out of Gmail") (type . "3") (updated . "2013-03-19T00:51:27.000Z") (votes . 0)) ((id . "13315") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-11T23:52:11.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-708") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Project: Virtualization") (type . "3") (updated . "2013-02-11T23:54:56.000Z") (votes . 0)) ((id . "13317") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-11T23:54:34.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Focus on Management tools and integration with other things (ie: puppet, nagios, ganglia)\n\n* KVM\n* Eucalyptus\n* Foreman\n") (duedate) (environment) (fixVersions) (key . "SYS-710") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Phase 2: Testing") (type . "7") (updated . "2013-04-01T22:53:58.000Z") (votes . 0)) ((id . "13547") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-02-27T23:33:50.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "* (+) DB\n** TMI\n** Countess\n** Site_DB rails_readonly (RO)\n** Site_DB rails (RW)\n** Usher read\n** Usher write\n** (-) PGBouncer external\n* (-) S3 - Appkey/Pass\n* (-) JTVFS\n* (-) 3rd Party Tokens, keys, etc.\n* SSH Keys\n** (+) Brigade NPW\n** (+) Brigade Push\n** (+) Brigade Pull\n** (-) root_key\n** (+) database key (postgres user)\n** (+) backup key\n** (-) JTV Private Key\n* (-) TMI - In Puppet?\n* (-) VPN Cert\n\nh3. Notes\n* (-) Denotes items that are internet accessible\n* (+) Denotes items that are not internet accessible") (duedate) (environment) (fixVersions) (key . "SYS-785") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Security Shizzle") (type . "3") (updated . "2013-03-11T22:15:40.000Z") (votes . 0)) ((id . "13608") (affectsVersions) (assignee . "akraut") (attachmentNames "2013-03-25_11-22-24_197.jpg") (components) (created . "2013-03-03T03:59:07.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-796") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "RMA Drive in boing163") (type . "3") (updated . "2013-04-03T01:30:21.000Z") (votes . 0)) ((id . "13636") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-05T09:09:32.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Mirror all repos to from git1 to git2. Get web and video onboard make sure their repos are being copied.") (duedate) (environment) (fixVersions) (key . "SYS-814") (priority . "6") (project . "SYS") (reporter . "gary") (resolution) (status . "10002") (summary . "Mirror all repos to from git1 to git2") (type . "3") (updated . "2013-04-01T23:26:12.000Z") (votes . 0)) ((id . "13774") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-16T01:44:39.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "We need one of the archive puller boxes to be turned into a wowza box for some performance testing.  Any box will do, the services are in darklaunch so they can just be stopped with no consequences to users.") (duedate) (environment) (fixVersions) (key . "SYS-873") (priority . "6") (project . "SYS") (reporter . "jorge") (resolution) (status . "3") (summary . "Wowza testing on archive puller boxes") (type . "3") (updated . "2013-03-19T20:02:58.000Z") (votes . 0)) ((id . "13809") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-18T22:18:22.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-878") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "delete old jtv key") (type . "7") (updated . "2013-03-18T22:18:41.000Z") (votes . 0)) ((id . "13901") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-25T08:01:03.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "* job29.sfo01\n* job30.sfo01\n* job31.sfo01\n* job32.sfo01") (duedate) (environment) (fixVersions) (key . "SYS-912") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "upgrade memory in sfo01") (type . "3") (updated . "2013-03-25T20:30:55.000Z") (votes . 0)) ((id . "13917") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-26T03:07:49.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-922") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "Build new mail boxes") (type . "3") (updated . "2013-04-08T22:33:17.000Z") (votes . 0)) ((id . "13948") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-03-29T01:31:44.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Currently, the ~jtv/.ssh/authorized_keys for many servers (discovery1 in particular) only allow access with the npw_brigade key from the brigade1.sfo01.justin.tv host. We need to make it so they're also accepted from the new brigade host (brigade2.sfo01.justin.tv).\n\nThis is necessary for deploying from the new brigade host.\n\n# From: npw_brigade\nfrom=\"199.9.250.11\"") (duedate) (environment) (fixVersions) (key . "SYS-937") (priority . "6") (project . "SYS") (reporter . "doug") (resolution) (status . "10002") (summary . "npw_brigade authorized_keys need to have brigade2.sfo01.justin.tv allowed") (type . "3") (updated . "2013-04-05T23:02:18.000Z") (votes . 0)) ((id . "13966") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-01T22:50:26.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-945") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "3") (summary . "take captures on job26 and a span port") (type . "3") (updated . "2013-04-01T22:50:41.000Z") (votes . 0)) ((id . "14106") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-08T19:59:27.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description . "Elizabeth Baker starting 4/11/13 \nAllen Lee starting 4/15/13\n\nboth are on the wiki, thanks!") (duedate) (environment) (fixVersions) (key . "SYS-977") (priority . "6") (project . "SYS") (reporter . "jessica") (resolution) (status . "3") (summary . "New Hires LDAP Needed") (type . "3") (updated . "2013-04-09T02:25:59.000Z") (votes . 0)) ((id . "14129") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2013-04-08T23:45:42.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil))) (description) (duedate) (environment) (fixVersions) (key . "SYS-997") (priority . "6") (project . "SYS") (reporter . "akraut") (resolution) (status . "10002") (summary . "Enable http-smart-mode git access on git.internal") (type . "3") (updated . "2013-04-08T23:45:57.000Z") (votes . 0)) ((id . "10115") (affectsVersions) (assignee . "akraut") (attachmentNames) (components) (created . "2012-07-13T04:12:26.000Z") (customFieldValues ((customfieldId . "customfield_10901") (key) (values nil)) ((customfieldId . "customfield_10101") (key) (values "11/Feb/13"))) (description . "stats1 is a Dell PE 850 (which needs to be decommissioned). stats runs apiwiki.justin.tv. This needs to move either to a new standard system or 3rd party service.\n") (duedate) (environment) (fixVersions) (key . "SYS-17") (priority . "7") (project . "SYS") (reporter . "gary") (resolution) (status . "3") (summary . "Replace stats1 with a 64bit system") (type . "3") (updated . "2013-02-11T23:35:10.000Z") (votes . 0))))
  call-interactively(org-jira-get-issues record nil)
  command-execute(org-jira-get-issues record)
  execute-extended-command(nil "org-jira-get-issues")
  call-interactively(execute-extended-command nil nil)

[baohaojun]

ensure-on-issue-id is a macro, so you will probably encounter this
error. I myself used mostly edebug-defun when debugging this org-jira
macro, with (edebug-eval-macro-args t) in my customization.

And I think the error message is only caused by you trying to debug
the real problem, so what is it?

[opie4624]

I'm unable to get more than one issue from JIRA:

Decrypting /Users/akraut/.authinfo.gpg...done
Contacting host: twitchtv.atlassian.net:443
Opening TLS connection to `twitchtv.atlassian.net'...
Opening TLS connection with `gnutls-cli --insecure -p 443 twitchtv.atlassian.net'...done
Opening TLS connection to `twitchtv.atlassian.net'...done
Contacting host: twitchtv.atlassian.net:443
Opening TLS connection to `twitchtv.atlassian.net'...
Opening TLS connection with `gnutls-cli --insecure -p 443 twitchtv.atlassian.net'...done
Opening TLS connection to `twitchtv.atlassian.net'...done
Contacting host: twitchtv.atlassian.net:443
(New file)
OVERVIEW
Contacting host: twitchtv.atlassian.net:443
Opening TLS connection to `twitchtv.atlassian.net'...
Opening TLS connection with `gnutls-cli --insecure -p 443 twitchtv.atlassian.net'...done
Opening TLS connection to `twitchtv.atlassian.net'...done
Tag :SYS_481: set in 1 headings
Contacting host: twitchtv.atlassian.net:443
Opening TLS connection to `twitchtv.atlassian.net'...
Opening TLS connection with `gnutls-cli --insecure -p 443 twitchtv.atlassian.net'...done
Opening TLS connection to `twitchtv.atlassian.net'...done
Contacting host: twitchtv.atlassian.net:443
Invalid function: ensure-on-issue-id
Saving file /Users/akraut/.org-jira/SYS.org...
Wrote /Users/akraut/.org-jira/SYS.org

However org-jira-get-issues-headonly seems to work fine

[baohaojun]

org-jira-get-issues-headonly is designed exactly for this problem:
somebody cannot use org-jira-get-issues to get all his issues; it always
failed in the middle (for e.g., 10 issues are successfully downloaded,
but the 11th fails, and so all remaining will not be downloaded as
well).

I'm not sure what you mean by unable to get more than one issue from JIRA:, do you mean you can download one issue, but not more than one?
If it's so, than org-jira-get-issues-headonly is exactly for you:-)

See #1, does it fix your problem?

[opie4624]

When I use org-jira-get-issues, I get one issue. When I use org-jira-get-issues-headonly I get all assigned to me. But clicking the links in the headonly give me the same error. Invalid function: ensure-on-issue-id

[baohaojun]

This is very weird, because evaluating as simple an expression as (ensure-on-issue-id 'issue-22 (message "echo hello")) should work with the following error instead of an invalid function:

Debugger entered--Lisp error: (error "issue issue-22 not found!")
  signal(error ("issue issue-22 not found!"))
  error("issue %s not found!" issue-22)
  (if p nil (error "issue %s not found!" (quote issue-22)))
  (unless p (error "issue %s not found!" (quote issue-22)))
  (let (p) (setq p (org-find-entry-with-id (quote issue-22))) (unless p (error "issue %s not found!" (quote issue-22))) (goto-char p) (org-narrow-to-subtree) (message "echo hello"))
  (save-restriction (widen) (show-all) (goto-char (point-min)) (let (p) (setq p (org-find-entry-with-id (quote issue-22))) (unless p (error "issue %s not found!" (quote issue-22))) (goto-char p) (org-narrow-to-subtree) (message "echo hello")))
  (save-excursion (save-restriction (widen) (show-all) (goto-char (point-min)) (let (p) (setq p (org-find-entry-with-id (quote issue-22))) (unless p (error "issue %s not found!" (quote issue-22))) (goto-char p) (org-narrow-to-subtree) (message "echo hello"))))
  (ensure-on-issue-id (quote issue-22) (message "echo hello"))
  eval((ensure-on-issue-id (quote issue-22) (message "echo hello")) nil)
  eval-expression((ensure-on-issue-id (quote issue-22) (message "echo hello")) nil)
  call-interactively(eval-expression nil nil)

Please tell me what do you get with evaluating that expression, and if it's the same "invalid function" error, please tell me what is your Emacs version?

[opie4624]

As predicted, I get issue issue-22 not found!

[baohaojun]

Then I am really bewildered! Please try to use edebug-defun on org-jira-get-issues, and step through it. Also try toggle debug-on-error off.

[opie4624]

I will try to do that. My elisp is not very good, so I'll probably get someone to help me out. I suspect, after talking to our JIRA guy, that it has something to do with the customizations we've done to our JIRA setup. I hope to have more info for you soon.

[bcasiello]

I see the same issue using Emacs version 24.3.1; it has something to do with compiled elisp - if I remove org-jira.elc, then org-jira-get-issues works (returning multiple issues), and clicking the links on org-jira-get-issues-headonly also works. I got org-jira from ELPA.

Apparently, 24.3 has some new feature around macros: http://dgutov.github.io/blog/2013/04/07/emacs-24-dot-3-s-killer-feature-eager-macro-expansion/
Maybe this is involved? Opie, what Emacs version are you using?

[baohaojun]

Ah, thanks a lot for the info! I need take a look into it.

[baohaojun]

It should have been fixed. The root cause is, as an self taught Emacs-lisp user, I didn't know the rule of thumb that a defmacro should be defined before it is used. Moving the defmacro to the beginning of org-jira.el solved this issue.

But of course, if you are using org-jira from elpa, you need wait this fix is pulled in.

Again, thanks for the report and the clue!