← Back to branch summary

~ubuntu-branches/debian/jessie/adabrowse/jessie

« back to all changes in this revision

Viewing changes to ad-indices.adb

  • Committer: Bazaar Package Importer
  • Author(s): Adrian-Ken Rueegsegger
  • Date: 2009-02-15 18:46:14 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20090215184614-skdqdiei7armqu7j
Tags: 4.0.3-1
* Fix dh-clean-k-is-deprecated lintian warning.
* Merging upstream version 4.0.3.
* Sync copyright notice with upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
ad-indices.adb
32
32
--   27-JUN-2003   TW  Initial version.
33
33
--   09-JUL-2003   TW  Special handling for empty indices and incomplete or
34
34
--                     private types.
 
35
--   22-FEB-2005   TW  Minor bug fix: set 'Is_Index' to True in call to
 
36
--                     'Put_XRef', so that links in indices get the Index_XRef
 
37
--                     stuff.
35
38
-- -->
36
39
-------------------------------------------------------------------------------
37
40
 
688
691
               end;
689
692
            end if;
690
693
            AD.Printers.Open_Index_Item (Printer);
691
 
            AD.Printers.Put_XRef (Printer, Item.XRef);
 
694
            AD.Printers.Put_XRef (Printer, Item.XRef, Is_Index => True);
692
695
            if Item.Is_Private then
693
696
               AD.Printers.Write_Plain (Printer, " (private)");
694
697
            end if;