Skip to content

Commit

Permalink
Merge pull request #558 from k-okada/fix_color_warning
Browse files Browse the repository at this point in the history 
warn misisng color names
  • Loading branch information
@k-okada
k-okada authored Jun 11, 2020
2 parents 838761d + da44985 commit f0653bc
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion irteus/irtgl.l
View file
Original file line number Diff line number Diff line change
Expand Up @@ -460,7 +460,7 @@
((symbolp color)
(setq c (find-if #'(lambda (o) (eq (send o :name) color))
*face-colors*))
(if c (send c :diffuse) (warn "Color name not found ")))
(if c (send c :diffuse) (warn "Color name (~A) not found~%" color)))
(t color)))
(unless v (setq v (float-vector 0.5 0.5 0.5)))
v))
Expand Down

1 comment on commit f0653bc

@k-okada
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Thank you for contributing jskeus documentation

Please check latest documents before merging

PDF version of Japanese jmanual: jmanual.pdf
HTML version of Japanese manual: jmanual.html
Sphinx (ReST) version of Japanese manual: jmanual.rst

Please sign in to comment.