224 snapshot.cumulate_markup[List[Text.Info[PIDE.editor.Hyperlink]]]( |
224 snapshot.cumulate_markup[List[Text.Info[PIDE.editor.Hyperlink]]]( |
225 range, Nil, Some(hyperlink_include), _ => |
225 range, Nil, Some(hyperlink_include), _ => |
226 { |
226 { |
227 case (links, Text.Info(info_range, XML.Elem(Markup.Path(name), _))) |
227 case (links, Text.Info(info_range, XML.Elem(Markup.Path(name), _))) |
228 if Path.is_ok(name) => |
228 if Path.is_ok(name) => |
229 val jedit_file = PIDE.thy_load.append(snapshot.node_name.dir, Path.explode(name)) |
229 val jedit_file = PIDE.thy_load.append(snapshot.node_name.master_dir, Path.explode(name)) |
230 val link = PIDE.editor.hyperlink_file(jedit_file) |
230 val link = PIDE.editor.hyperlink_file(jedit_file) |
231 Some(Text.Info(snapshot.convert(info_range), link) :: links) |
231 Some(Text.Info(snapshot.convert(info_range), link) :: links) |
232 |
232 |
233 case (links, Text.Info(info_range, XML.Elem(Markup(Markup.ENTITY, props), _))) |
233 case (links, Text.Info(info_range, XML.Elem(Markup(Markup.ENTITY, props), _))) |
234 if !props.exists( |
234 if !props.exists( |
367 "\n" + t.message |
367 "\n" + t.message |
368 else "" |
368 else "" |
369 Some(add(prev, r, (true, XML.Text(txt1 + txt2)))) |
369 Some(add(prev, r, (true, XML.Text(txt1 + txt2)))) |
370 case (prev, Text.Info(r, XML.Elem(Markup.Path(name), _))) |
370 case (prev, Text.Info(r, XML.Elem(Markup.Path(name), _))) |
371 if Path.is_ok(name) => |
371 if Path.is_ok(name) => |
372 val jedit_file = PIDE.thy_load.append(snapshot.node_name.dir, Path.explode(name)) |
372 val jedit_file = PIDE.thy_load.append(snapshot.node_name.master_dir, Path.explode(name)) |
373 Some(add(prev, r, (true, XML.Text("file " + quote(jedit_file))))) |
373 Some(add(prev, r, (true, XML.Text("file " + quote(jedit_file))))) |
374 case (prev, Text.Info(r, XML.Elem(Markup(name, _), body))) |
374 case (prev, Text.Info(r, XML.Elem(Markup(name, _), body))) |
375 if name == Markup.SORTING || name == Markup.TYPING => |
375 if name == Markup.SORTING || name == Markup.TYPING => |
376 Some(add(prev, r, (true, pretty_typing("::", body)))) |
376 Some(add(prev, r, (true, pretty_typing("::", body)))) |
377 case (prev, Text.Info(r, XML.Elem(Markup(Markup.ML_TYPING, _), body))) => |
377 case (prev, Text.Info(r, XML.Elem(Markup(Markup.ML_TYPING, _), body))) => |