CVS difference for arm/progs/arm_frm.adb

Differences between 1.14 and version 1.15
Log of other versions for file arm/progs/arm_frm.adb

--- arm/progs/arm_frm.adb	2004/11/04 05:40:23	1.14
+++ arm/progs/arm_frm.adb	2004/11/05 05:46:28	1.15
@@ -148,6 +148,8 @@
     -- 11/02/04 - RLB - Added "DeletedAdded" ChgRef kind.
     -- 11/03/04 - RLB - Fixed @Chg nesting glitch.
     --		- RLB - Added InnerInnerItemize == Nested_X2_Bulleted.
+    -- 11/04/04 - RLB - Fixed a problem that reset the insertion number for
+    --			paragraphs have a normal AARM para. was encountered.
 
     type Command_Kind_Type is (Normal, Begin_Word, Parameter);
 
@@ -1721,6 +1723,7 @@
 	            Format_Object.Current_Paragraph_Len := PNum'Last - 1;
 		    if Update_Numbers then
 		        Format_Object.Next_Paragraph := Format_Object.Next_Paragraph + 1;
+		        Format_Object.Next_Insert_Para := 1;
 		        Format_Object.Next_AARM_Sub := 'a';
 			Format_Object.Next_AARM_Insert_Para := 1;
 		    end if;
@@ -1737,9 +1740,6 @@
 		    end if;
 	            Format_Object.Current_Paragraph_Len := Format_Object.Current_Paragraph_Len + 2;
 	        -- else no version to display.
-		end if;
-	        if Update_Numbers then
-		    Format_Object.Next_Insert_Para := 1;
 		end if;
 	    end if;
 	end Paragraph_Number_String;

Questions? Ask the ACAA Technical Agent