diff options
| author | Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de> | 2014-10-27 12:43:13 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de> | 2014-10-27 12:43:13 +0100 |
| commit | ddd7578a4123ca9082d30cadf35baced3f145401 (patch) | |
| tree | 67a37780cd7f1b12ef4d0b6ffa6d89b84fa6dba8 | |
| parent | 88aea1616152c0e4ed648cdc8ac599d1f443915d (diff) | |
on RET: only check for job, not for field
| -rw-r--r-- | grid-engine-mode.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/grid-engine-mode.el b/grid-engine-mode.el index 19e4881..9eec231 100644 --- a/grid-engine-mode.el +++ b/grid-engine-mode.el @@ -38,10 +38,9 @@ (define-key grid-engine-list-mode-map (kbd "g") 'revert-buffer) (define-key grid-engine-list-mode-map (kbd "<RET>") (lambda (&optional arg) - (let ((field (get-text-property (point) 'field)) - (job (get-text-property (point) 'grid-engine-job))) - (unless (and field job) (interactive "P") + (let ((job (get-text-property (point) 'tabulated-list-id))) + (unless job (error "[Grid Engine] point is not on a field of a job record")) (grid-engine-job-details job arg))))) |