Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Ensure a link file is set before normalizing

keyword link to main routine.
  • Loading branch information...
commit 76d58ec21a77865194ae037c13efe80733418ec1 1 parent 6adfc1a
@jdtsmith authored
Showing with 3 additions and 3 deletions.
  1. +3 −3 idlwave.el
View
6 idlwave.el
@@ -4769,9 +4769,9 @@ Gets set in cached XML rinfo.")
((eq ptype 'KEYWORD)
(setq kwd (cdr (assq 'name props))
klink (cdr (assq 'link props)))
- (if (not (string= (file-name-directory klink)
- link-dir))
- (setq klink (concat link-dir "/" klink)))
+ (if (and link-dir klink
+ (not (string= (file-name-directory klink) link-dir)))
+ (setq klink (concat link-dir klink)))
(if (string-match "^\\[XY\\(Z?\\)\\]" kwd)
(progn
(setq pref-list
Please sign in to comment.
Something went wrong with that request. Please try again.