| 
					
				 | 
			
			
				@@ -2228,7 +2228,7 @@ INDENT was the original indentation of the block." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 			     (point-min) (point-max)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		    (if (string-match "<pre\\([^>]*\\)>\n?" rtn) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 			(setq rtn (replace-match 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-				   (format "<pre class=\"src src-%s\">\n" lang) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+				   (format "<pre class=\"src src-%s\">" lang) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 				   t t rtn)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		(if textareap 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		    (setq rtn (concat 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -2243,7 +2243,7 @@ INDENT was the original indentation of the block." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 						'((?&."&")(?<."<")(?>.">")))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 				     t t)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		    (setq rtn (buffer-string))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-		  (setq rtn (concat "<pre class=\"example\">\n" rtn "</pre>\n")))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		  (setq rtn (concat "<pre class=\"example\">" rtn "</pre>\n")))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	      (unless textareap 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		(setq rtn (org-export-number-lines rtn 'html 1 1 num 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 						   cont rpllbl fmt))) 
			 |